

tagoknak 
törzsutas 
kedvezmény, 
gyermek 
és ifjúsági 
kedvezmény! 
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MAGYARORSZÁG 

1051 Budapest, Dorottya u. 11. Tel./Fax: 267-2016 

































































HOBBI 
ELEKTRON IK 

Urbán István mérnök áramköreinek szaküzlete 


Budapest VII., Dózsa György út 16. (Dózsa—Jobbágy sarok) 
Nyitva: H-P 10-17-ig Tel./fax: 122-8892 
(Zárás után üzenetrögzítő) 


KÍNÁLATUNKBÓL 


| SZÁMÍTÁSTECHNIKA: 

C64 BÓVÍTÓK 

egys. 

élesztve] 

PLOFI Datassette cartrkfge 

1.200 

Ft 

1.500 

Ft 

PLOFI Help + cartridge 

1.200 

Ft 

1.500 

Ft 

PLOFI FASTLOAD cartridge 

1.200 

Ft 

1.500 

Ft 

PLOFI FASTLOAD + SPEEDTAPE 

1.500 

Ft 

1.700 

Ft 

PLOFI SIMON'S cartridge 

1.500 

Ft 

1.700 

Ft 

PLOFI JÁTÉK cartridge 

1.500 

Ft 

1.700 

Ft 

ACTION REPLAY MK7 cartridge 

— 


3.450 

Ft 

ATOMIC POWER cartridge 

— 


3.450 

Ft 

FINAL III. cartridge 

— 


3.450 

Ft 

PAGEFOX DTP cartridge 

3.200 

Ft 

3.900 

Ft 

MINI EPROMBANK cartridge 

2.300 

Ft 

2.900 

Ft 

EPROMBANK 256 Kbájt 

2.900 

Ft 

4.000 

Ft 

C64 DOKTOR teszt cartridge 

2.300 

Ft 

3.000 

Ft 

EPROMÉGETÓ (2716-27512-ig) 

3.400 

Ft 

4.500 

Ft 

IC TESZTER (kb. 180 TTL IC) 

2.700 

Ft 

3.900 

Ft 

256K RAM BÓVÍTÓ RAM floppi 

— 


11.800 

Ft 

FÉNYCERUZA ♦ szoftver 

950 

Ft 

1.450 

Ft 

HANGDIGITAUZÁLÓ + szoftver 

1.350 

Ft 

1.700 

Ft 

HANGKAPCSOLÓ + szoftver 

700 

Ft 

990 

Ft 

DATASSETTE fejbeállító 

390 

Ft 

— 


CPU STOP + RÉSÉT 

400 

Ft 

_ 


FREKVENCIAMÉRŐ 30 MHz 

1.300 

Ft 

1.800 

Ft 

l/O BÓVÍTÓ 8255-tel 

1.400 

Ft 

1.800 

Ft 

JOYSTICK automata 

1.500 

Ft 

1.900 

Ft 

USER CENTRONICS kábel 

750 

Ft 

- 


| IBM BÓVÍTÓK 

egys. 

élesztve 


IBM IC TESZTER + szoftver 5.900 Ft 
IBM EPROMÉGETÓ * szoftver 4.800 Ft 
IBM EPROMÉGETÓ tápegység 1.200 Ft 
IBM CODEC HANGKÁRTYA 3.800 Ft 


9.800 Ft 
9.900 Ft 
t benne 

4.800 Ft 


IBM KOVOX - 700 Ft 

IBM AKTlV KOVOX 1.600 Ft - 

IBM l/O KÁRTYA 48 vonal 3.500 Ft - 

IBM GÁL PROGRAMOZÓ 6.500 Ft 8.500 Ft 


TANGÓ PLD jogtiszta szoftver. Kérjen árajánlatotI 
TANGÓ NYAKTEVEZÓ jogüszta szoftver 
TTL. CMOS. TRANZISZTOR, DIÓDA, MEMÓRIA 
katalógus floppylemezen, egységesen: 600 Ft/db 


C-64 BÖRZE 


Használt C-64-ef, flopit adok*veszek. 
Hibás gépet beszámítok, megvásárolok. 
Megegyezés szerint 
új IBM PC részegységre cserélek. 


Áraink a 25% ÁFA-t tartalmazzák! 


Szaküzletemben vásárolhat a Commodore Újság HOBBI ELEKTRONIKA rovatában megjelent hardverleírásokhoz 
(működő minta alpján) panelt, egységcsomagot, vagy készre szerelt áramkört. 



Állandóan változó készlet! 


MŰSZERVÁSÁR 

Bontott anyagok, 
használt műszerek 
böngészdéje 


Vidéki olvasóknak segít a szerző levelező, egységcsomagküldő 
szolgáltatása: a megrendelt csomagot postán utánvéttel 
elküldöm. Telefonon/faxon és levélben is rendelhet. 

A HOBBI ELEKTRONIKÁ-hoz nem kell hosszú levél. Rendelését 
néhány sorban, egyértelműen közölje. 

Levélcím: 1656 Budapest Pf. 50. 


Az üzletben megvásárolhatók az RT évkönyvei, a Rádiótechnika és a Hobby Elektronika korábbi számai. 
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MIT, HOGYAN, HOL, MIKOR? 


EGYESÜLETI ÜGYEK: Egyesületünknek tagja lehet min¬ 
denki, aki a tagsági díjat befizeti. A tagdíjat személyesen az 
egyesület irodjában (1025 Budapest, Vöröstorony utca 29. 
Telefon: 1-76-22-57), vagy átutalással az MNB 217-98 292, OTP 
565-3610-8 számlára lehet befizetni. Megrendelés esetén szám¬ 
lát küldünk. 

Pötyögőszolgálatunk valamint a szervizkedvezmény és az 
apróhirdetés lehetősége tagjaink rendelkezésére áll. 

A DEÁKPÁHOLY tagjai minden hónapban megkapják a 
C-újságot, a tagsági díj egy évre 1020 Ft. 

A PLUSZPÁHOLY tagjai minden hónapban megkapják a 
C-újságot, és kapnak havonta 3 db vásárlási utalványt. A tagsági 
díj egy évre 2350 Ft. 

A SZUPERPÁHOLY tagjai havonta 15 példányt kapnak a 
C-újságból, és ezzel havonta 15x3 db vásárlási utalványt is. Az 
éves tagsági díj 24 000 Ft. 

ÜGYFÉLFOGADÁS: Minden kedden és csütörtökön 12—16 
óra között várjuk tagjainkat és az érdeklődőket. 
PÖTYÖGŐSZOLGÁLAT: Az újságban megjelenő programo¬ 
kat másolja a megrendelők részére. Megrendelhető személyesen 
az egyesület irodájában vagy postai utánvéttel. Postacím: 1388 
Budapest 62., Postafiók; 86. 

APRÓHIRDETÉS: Az egyesületi tagoknak ingyen áll rendel¬ 
kezésére. Nem tagoknak a hirdetés ára 300 Ft. A hirdetés módja: 
az újságban megjelenő nyomtatvány kitöltésével. 

A C-ÚJSÁG RÉGEBBI SZÁMAI megvásárolhatók az egyesü¬ 
let irodájában, vagy megrendelhetők utánvéttel. 

Kedvezményes ár! Tagoknak olcsóbb! 

Az újságban eddig megjelent programok gépenként össze¬ 
gyűjtve megrendelhetők. VC 20, C16, PLUS/4, C128, C64. To¬ 
vábbi felvilágosítást is adunk az 1-76-22-57-es telefonszámon 
vagy levélben! 

Vidéki pluszpáholy-tagjaink háromhavi tikett összegyűjté¬ 
sekor igénybe vehetik a NOVOTRADE 2C Áruház csomagküldő 
szolgálatát. 

VIDÉKEN TOVÁBBI INFORMÁCIÓK KAPHATÓK: 

Baja, AXIS Kft. 

Győri Bartók Béla Művelődési Ház, 

Jászberényi Városi Könyvtár, 

Kecskemét, SZIGMA-BIT, 

Pécsi Apáczai Csere János Gimnázium, 

Zalaegerszegi Ságvári Endre Gimnázium. 


Az Országos Commodore Egyesület módszertani kiadványa 

Egyesületi iroda és szerkesztőség: 

1025 Budapest, Vöröstorony utca 29. Telefon: 1-76-22-57 

Felelős kiadó: Horváth Judit, az egyesület elnöke 

Főszerkesztő: Rados Péter, az OCE főtitkára 

Felelős szerkesztő: dr. Horváth András 

Művészeti szerkesztő: Bausz Sándor 

Levélcím: Commodore Újság, 1388 Budapest, 62. Pf.: 86. 

Index: ISSN 0237-756 X 

Terjeszti a Nemzeti Hírlapkereskedelmi Rt. és 

a regionális részvénytársaságok 

Megvásárolható a hírlapárusoknál 

94.0136 MSZH Nyomda és Kiadó Kft., Budapest 

Felelős vezető: Nagy László 


EGYESÜLET 


Tisztelt Szerkesztőség! 


Talán megszokták már, hogy valamilyen ötlettel hozakodok 
elő. Azt hiszem ismét valami újat mutathatok, a kísérleteim 
eredményei segítségével! 

Ez az ötlet nem más, mint a programok működés közbeni 
megrövidítése. Kivitelezése hasonló, mint a SORSZÁMHELP- 
nél, csak itt a kiváltás nem END-el, hanem NEW-el történik. 

Hosszabb programoknál — a legváratlanabb pillanatokban 
(OUT OF MEMORY) — hibajelet kaphatunk. A memória vé¬ 
ges, íme vége, betelt. Ez a hiba nem engedhető meg semmiféle 
programban, ezért a programírónak erre különösen ügyelnie 
kell! 

Különösen veszélyes ez a hiba a SEQ adatfeldolgozó progra¬ 
mokban, ahol az adatmanipulációk a memóriában történnek és 
utólag kerülnek adathordozóra. A hiba következtében az adatok 
elveszhetnek. Persze ügyeskedni lehet a korlátozásokkal (DIM, 
adathossz), strukturált programozással, BASIC kompresszorral 
és grafika egyszerűsítéssel. Megoldás lehet a menüvezérelt 
programcsomag, valamint a gépi rutinok használata is. 

Olyan apróság is sokat segíthet, hogy a (leggyakrabban 
használt) változóknak lehetőleg egybetűs nevet adunk. E megol¬ 
dások kombinált használatával programjaink hossza akár félére 
is csökkenthető. 

Az én módszerem teljesen más. A lényege, hogy a felesle¬ 
gessé vált részt egyszerűen elhagyjuk! Persze a technikáját meg 
kell ismerni. Elkészítve nem is tűnik nehéznek. Ám egy autodi¬ 
daktának mindig az ötletek megvalósítása okozza a legnagyobb 
gondot és élményt. A buta gép nem érti az okos programozó 
szándékát, csak a kapott feladatot pontosan végrehajtja; a formai 
(syntax) hibákat jelzi, de a logikát, a lehetőségek kihasználását 
a programozótól várja. 

A program kurtítását az alábbiak szerint valósítottam meg 
a mellékelt Extra BIORITMUS-nál. 

A kezdéskor egyszer használatos programrészeket össze¬ 
gyűjtöttem (gépi rutinok basic betöltői, bemutatkozó grafika, 
beállító POKE-k, help stb.) a program végére helyezés céljából. 
Beépítettem a csonkítást végrehajtó sorokat, majd lemezre 
írtam. 

A program többi részét előkészítve elmentettem, lekérdez¬ 
tem a programvéget: 

PRINTPEEK(45)+PEEK(46)*256—2 (RETURN) 

Ez a példaprogramban: 7058. 

Két dolgot most jól meg kell jegyezni: 

— a számot (felírni); 

— és azt, hogy a (első) programrész változtatásával a felírt 
érték változik! 

Az értékek a basic kezdet átállítására használtam a törlendő 
rész elején található sorral: 

POKE43,7058AND255: POKE44,7058/256:CLR 

A CLR szükséges a daták beolvasása miatt! Ha valaki az 
eredményről meg akar győződni, indítás előtt a POKE788 és 
POKE657 utasításokat vegye ki a programból, a bemutatkozó 
kép után nyomjon STOP-ot, majd listá z hat. 10000-es sorszám 
felett tetszőlegesen változtathatja a sorokat! 

A feleslegessé váló rész végéhez hozzáfűztem az alábbi két 

sort: 


PRINTCHR$(147)’ | 


| POKE43,l:POKE44,8:GOTO1030’ ’ 


POKE631,13:POKE198,l:PRINT’ ’S’ ’:NEW 


Az első sor felírja a képernyőre a basic terület eredeti értéke 
visszaállításához POKE és az újraindításhoz szüséges GOTO 
utasításokat. 
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o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1 440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 


EXTRA BIORITMUS *##* 
MESTERHÁZI CELLDOMOLK 


RÉM **** 

RÉM IRTA: 

GOTO 10000 
RÉM #*# ADATOK *** 
CLR:DIMM%(13),M$(12) 
F0RI=1T013:READM%(I) 
FORI=1TG12:READM$(I) 
FORI = .T06:READPP $(I) 
Pl 
T$ = 


NEXT 
NEXT 
NEXT 

2#it:B = P I / 23:C = P I / 28: D = P I /33 : R = 7: W = 49300 
U$ = " L " : = " F’: G $ = ” F* 

.:G$ = G$ + "-f":NEXT 


'CHTT* 

BTuRITMUS 


C0MMQD0RE64 b 
IRTA:MESTERHAZI SÁNDOR 


CITI ZENI20D 
CELLDOMOLK 


MEG T 


FÓR I = 1T037 : T$ = T$ + "-r" : U$ = U$ + " 

T$ = T$ + "-i":U$ = U$ + "-"’:G$=G$ + "-1" 

FORI=1T018:Q$=Q$+" +”:NEXT:Q$=Q$+ 

POKE53280,1:P0KE53281,1 
Q=. :PR I NT” 

PR I NT"gj 
PR1NT"S 
PR1NT"g"U$ 

PRlNT"fiSFINDEN VALASZ UTÁN NYOMJA 
PR I NT"5\ RETURN BILLENTYŰT!" 

P0KE198. . :PRINT"[gSB KEREM AZ ON NEVET! 

I FN$ = " "THENN$ = " ANtiNYMUS" 

PRlNT"[=rn3 ÍRJA BE A DÁTUMOT 
PR I NT"g A MINTÁNAK MEGFELELŐEN ! 

PRINT"BneV : "N$ 

SYSW,20, 12,"EV HO NAP":PR INTTAB(18)" .- 

PRINT"gn SZÜLETÉSI DÁTUM fi 1900.01.01"0$ 
GOSUB22F0:IFC0=1THEN1270 
GOSUB2680 
IFC0=1THEN1270 
YB=CE:MB=CH:DB=CN:GOSUB2310 
SYSW, 2, 18, "E"CK$ + " JEGYEBEN SZÜLETETT' " 
GOSUB2460-.PR1 NT"® SZÜLETÉSNAPJA: 

TB=INT(DB+365.25*YB+M%(MB)+.01*MB 

SYSW, 18, 15, "ín I— F - -1 1 

PRINT"gja VIZS 
GOSUB2680 


INPUTNÍ 


:P$ 
.03) 


5GALAT NAPJA fi ”X$0$;:GOSUB2280 


IFC0=1THEN1360 

YS=CE:MS=CH:DS=CN 

1FYB>YSTHENPR1NT, ," EV":GOTO 1360 

IFYB = YSTHENIFMB>MSTHENPRI NT, ," HO":GOTO1360 

IFMB=MSTHENIFDB>DSTHENPRINT,,"NAP":GOTO1360 

GOSUB2640:F0R1=.T09:P0KE781,1:SYS59903:NEXT 

SYSW. 18 17 "Sí 1 -1- ‘ -'" 

SYSW; 7, h.3, '’JJ JÓK AZ ADATOK ( I ) ? " 

IFPEEK(0)=64THEN1470 
IFPEEK(O) O33THEN1150 
RÉM *#* SZÁMÍTÁSOK * * * 

TS=I NT(DS + 365.25*YS+M%(MS) + .01*MS-.03) 
TT=TS-TB:PS=23*(TT/23-INTCTT/23)) 

ES = 28* CTT/28-INT(TT/28)) 

IS=33#(TT/33-INTCTT/33)) 

GOSUB1900:POKE646,5:REM RAJZLAP 
RÉM »** BIORITMUS RAJZA *** 

FORK =.T038:P =INT<R + R#SIN(<PS + K)#B) + .5) 

SYSW,K,P+5,"X":NEXTK:P0KE646,10 
F0RK=.T038:E=I NT(R + R#SINC(ES + K)*C) + .5) 

SYSW,K,E+5,"#":NEXTK:P0KE646,14 
F0RK=.T038:I=INT(R+R*SIN((IS+K)«D)+.5) 

SYSW,K, I+5,"0":N E X T K 

GOSUB2640:GOSUB2200:REM REMEGES MEGJEGYZÉS 
RÉM VÁLASZTÁS 

IFPEEK(0)=64THEN1640 
IFPEEK(0)=4THEN1720 
IFPEEK(O)=5THENGOSUB1740 
IFPEEK(O)=6THEN1150 
IFPEEK(0)=3THEN1770 

IFPEEK(O)=41THENGOSUB2560:GOTO1720 
GOTO1640 

RÉM *** UJ LAP *** 

MS = MD:DS = DD:YS = YD:GOTO 1500 
RÉM *#* KEPERNYOSZINVALTAS * * * 

X=X+1:IFX>15THENX=. 

POKE53280,X:P0KE53281,X:RETURN 
RÉM * m * BEFEJEZES **** 

P0KE53281,6 : POKE53280, 14 : PR I NT"fTTSTSKESZÜLT : 
PR I NT" ( C= ÚJSÁG 1989/9) MŰNK A J ATLAP J AN : " 

PR I NT"+ OROKNAPTAR (C= ÚJSÁG 1992/5) 

PR I NT"+ KEPREMEGTETES (C= ÚJSÁG 1992/5) 

PR I NT"+ GÉPI RUTIN A GYORS RAJZOLÁSHOZ," 

PR I NT" -*■ SZAMOLASGYORS I TAS , " 

PR I NT"+ KEPERNYOMASOLAS," 

PR I NT"+ CSILLAGJEGYEK," 


KOVÁCS MIHÁLY' 


Ü 

O 

O 

O 

O 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
21 10 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 

2570 

2580 

2590 

2600 

2610 

2620 

2630 

2640 

2650 

2660 

2670 


PR I NT"+ HPROGRAMCSONKITASn," 

: SOK EGYEB APROSAÍT. . . " 


PR INT"ES 
PRINT"gri£ MLEKEZZ IN 
PRINT"[§Á JÓRA (gUJRAQ) ! 
RÉM *** RAJ ZLAPKESZ1TES * * * 
EV=YS-YB 

PR I NT"n”TAB (8) "5n r- 
- -jnj-fy. 


K A B B" 

' :P0KE788,49: 


P0KE657,.:POKE198,.:END 


PR INT" 


j TAB ( 8 ) "E 
; PR INT”EVt 


hu) 

N$=MID$(N$ , íT 2 3) 

X$ = STR$(YB)+"."+M$(MB)+STR$(DB)+" 

PR INTN$TAB(26)X$ 

SYSW,., 4, T$ 

F0RI=1T0R:PR1NTQ$:NEXT:PR INTG$ 

F0R1=1T0R:PRINTQ$:NEXT:PRINTU$ 

MD=MS:DD=DS:YD=YS 
Y =. :FORI = .T038: Y = Y + 1 

I FI / 2<> I NT( 1 / 2)THENPRINT"|I" ; :GOTO2080 
A$ = RI GHT$(STR$(DD) ,2) 


BIORITMUS Ifi "TT 


NAPOS” 


«P" . . 

'Mn"i 


GOTO2050 


IFDD<10THENPRINT"fTRIGHT$(A$,1) 

PR I NTLEFT$ (A$ , 1 ) "SlJ"R I GHT$ ( A$ , 1)' 

IFDD>2THEN2080 
YD$=STR$(YD):YD$=YD$+"."+M$(MD) 

I FY< = 34THENPRI NT" [g—1 "YD$” ■—■■BP " ; 

DD=DD+1 

IFDD<=(M%(MD+1)-M%(MD))THEN2140 
I FMDO2THEN2130 
IFYD/4 0 I NT (YD/4)THEN2130 
I FDDO0THEN2140 

DD=1:MD = MD +1: 1FMD>12THENMD=1:YD = YD+1 
NEXT 

SYSW, . , 24, "gJELEK: FIZIKAI=gX fcERZELM I t ERTELM I =BJDE" 
C$="JO VALTOZO MELY " 

FÓR I = 1TO17:SYSW,39, I +3,MID$(C$, 1,1):NEXT 
RETURN 

RÉM **» MEGJEGYZÉS *#* 

YY$ = "B P=IR":0PEN4,4,7:CL0SE4: IFST=- 128THENYYÍ = "5 P=IR" 
SYSW, . , 23, "33F 1 = LAPU 7 3 = H .SZÍ N||F5 = UJ NEV|JF7 = VÉG" YY$ 

RETURN 

RFM AHATflk' 

DATA, 31,59,90,'l20, 151, 181,212,243,273,304,334,365 
DATAJAN,FEB,MAR,APR,MÁJ,JUN,JUL,AUG,SEP,OKT,NOV,DEC 
DATAVASARNAP,HÉTFŐ,KEDD,SZERDA,CSÜTÖRTÖK,FENTEK , SZOMBAT 
RÉM *** DATUMBEVI TEL #** 

C0=.:INPUTX*:IFLEN(X$)<>10THENC0=1 
RETURN 

RÉM #** CSILLAGKÉPEK #*# 

T = M%(MB)+DB 

I FT<21THENCK$ = "B A K":RETURN 
IFT<51THENCK$=”VIZONTO":RETURN 
IFT<80THENCK$="HALAK”:RETURN 
IFT<111THENCK$="K 0 S":RETURN 
IFT<141THENCK$="B I K A":RETURN 
I FT<173THENCK$ = "IKREK”:RETURN 
IFT<204THENCK$="R A K":RETURN 
IFT<236THENCK$="OROSZLÁN":RETURN 
IFT<267THENCK$="S Z U Z":RETURN 
IFT<297THENCK$="MERLEG":RETURN 
I FT<327THENCK$ = "SK0RP 10" -.RETURN 
IFTi(£;356THENCK$ = "NY ILAS" : RETURN 
CK$ = "B A K":RETURN 
RÉM *** OROKNAPTAR *** 

TQ=DB:MQ=MB:JQ=YB 

XQ = TQ + MQ*31-31-INTCMQ*. 43) 

XQ=XQ+(MQ>2)#2+(JQ-l)*365 
XQ = XQ+( I NT(JQ+(MQ<3))/4) 

XQ = XQ+ ( ( ( JQ + 4)/400=INT( (JQ + 4)/400) ) AND ( MQ,>2 ) ) 

XQ=XQ-INT((JQ+104)/100)+INT((JQ+104)/400) 

YQ=XQ-1NTCXQ/7)*7 
P$=PP$(YQ) 

RETURN 

RÉM NYOMTÁTÁS 

0PEN4,4,7:CL0SE4: IFST=-128THENPR1NT"n" :SYSW, 13, 11, 

T$"NYOMTATÓ g NINCS!"U$ 

IFST=- 128THENF0RI = .TO2000:NEXT:GOTO1510 
0PEN4,4:PRINT«4,CHR$(27)"1":CL0SE4 
P0KE781,23:SYS59903 

SYS50152:0PEN4,4:PRINT#4,CHR$(27)" 

IFQ=.THENPRINT#4,"CSILLAGZAT:"CK$" 

Q=Q+1:CL0SE4:RETURN 
RÉM REMEGTETES-*- 

FORA1=.T03 

FORA=.TO40:POKE53270,A:NEXTA 
NEXT A 1:RETURN 

RÉM #»« DATUMELLENORZES #** 


SZ.NAP:"P$ 
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o 


o 


o 


o 


o 


o 


o 


o 


o 


2680 C0=.:CE=VAL(LEFT$lX$,4)) 

2690 CH=VAL(MID$(X$,6,2)) 

2700 CN=VAL(RIGHT$(X$,2)) 

2710 IFCE>3333THENC0=1:RETURN 

IFCH>12ORCN>31THENC0=1:RETURN 
IFCH<=.ORCN<=.THENC0=1:RETURN 

1FCN>30THENIFCH=40RCH=60RCH=90RCH=11THENC0=1:RETURN 
IFCE/40I NT(CE/4)ANDCH = 2ANDCN>28THENC0=1:RETURN 
IFCE/4=I NT(CE/4)ANDCH = 2ANDCN>29THENC0=1 
RETURN 

RÉM #** TÖRLENDŐ RÉSZ **** 

P0KE43,7058AND255:P0KE44,7058/256:CLR 
A$ = "[g" : FORI = . T038:A$ = A$ + "+" : NEXT I 

POKE53280, . :PQKE53281, . :PR INTCHRí(147):P0KE646,6 
FORI=.T022:PRINTA$:NEXTI:P0KE786,52:P0KE657,128 
RÉM **# HARDKOPI * * * 

FORI=50152TO50245:READX:POKEI,X:NEXT 
DATA169,4,133,186,169,126,133,184,169,,160,4 
DATA 133,113,132,114,133,183,133,185,32,192,255, 166 
DATA184,32,201,255,162,25,169,13,32,210,255,32 
DATA225,255,240,46,160,,177,113,133,103,41,63 
DATA6,103.36,103,16,2,9,128.112,2,9,64 
DATA32,210,255,200,192,40,208,230,152,24,101,113 
DATA133,113,144,2,230,114,202,208,205,169,13,32 
DATA210,255,32,204,255,169,126,76,195,255 
RÉM *#* SOR/OSZLOPALL 1TO **» 

FORI=49300TO49325:READX:POKEI,X:NEXT 
DATA32,253,174,32,158,183,138,72,32,253,174,32,158 
DATA 183, 104,168.24,32,240.255,32,253, 174,76,164,170 
RÉM #** SZÍNES BETUVILLOGTATA *»* 

FORT = 49152T049231:READD:POKET,D:NEXT 

DATA169,255,141,14,212,141,15,212,169,128,141,18,212,120,173,20,3 
DATA 141,38,192,173,21,3,141,39,192, 169,40,141,20,3,169,192, 141,21 
DATA88,96,234,234,162,,173,27,212,157,,216,157,,217,157,,218 


2720 

2730 

2740 

2750 

2760 

2770 

10000 

10010 

10020 

10030 

10040 

10050 

10060 

10070 

10080 

10090 
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10110 

10120 

10130 

10140 

10150 

10160 

10170 

10180 

10181 

10182 

10183 

10184 

10185 

10186 
10187 
10190 
10200 


,3 


DATA 15^, ,Í19,£32,£ 24 , ,£ 08 ,^36, 108,38, 192, 120, l>é,38, 192, 141,20,3 
DATA 173,39,192,141,21,3,88,96 
- CÍMFELIRAT «** 

r 


RÉM *** 
PR INT" 


i'I*í 


"r 



10210 

PRINT, 

rG 

#v# * 

# # 

# # # 


i” 






0 

10220 

PRINT, 

t 

* # * # 

* # 

# # # # 


i” 







10230 

PRINT," 

# # * # 

# # 

* # # * 


r 







10240 

PRINT, 


* * # # 

# # 

# # # # 

# # 

r 






0 

10250 

PRINT, 

N 

* * * # 

* # 

# # # # 


i" 







10260 

PRINT, 

’ 

# # * * 

# * 

* # * # 


r 







10270 

PRINT, 


# # # # 

* # 

* # # 


i" 






0 

10280 

PRINT, 

* 





1 " : 

PRINT 





10290 

PRINT" 

í 

j 
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10300 

PRINT" 

# # # # 

* # 

# * * # # # 

# # # * * # 

# # 

* * 

* # * 

i" 

0 

10310 

PRINT" 


# # # # 

# * 

# # 

# # 

* # 

* # 

# * 

# # 

* * * * 

i" 


10320 

PRINT" 


# # * * 

* * 

# # 

# * 

# * 

# # 

* # 

# # 

# # 

i" 


10330 

PRINT" 


* # # # 

# # 

# # 

# # 

# * 

* * 

* * 

* # 


i" 

0 

10340 

PRINT" 


* # * # 

# # 

# # 

* * 

* * 

# # 

# # 

* # 

# * 

i" 


10350 

PRINT" 


* # # # 

# # 

# # 

# # 

* # 

# # 

* * 

# * 

* * * # 

i" 


10360 

PRINT" 


# # # # 

# # 

# # 

# # 

# # 

# # 

* # # 

* * * 

i" 

0 

10370 

PRINT" 











j" 
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10380 

10390 

10400 

10410 

10420 

10430 

10440 

10450 

10460 

10470 

10480 

10490 

10500 

10510 

10520 

10530 

10540 

10550 

10560 

10570 

10580 

10590 

10600 

10610 

10620 

10630 

10640 

10650 

10660 


E$ = "E XT R A" :PRI NT"@5IT5"TAB(5) " r—t" 

F0R1=1T09:PRINTTAB(5) ’M^’M I D$ ( E$ , I , 1 ) " I " :NEXTI 

PRINTTAB(5)" 1 —:P0KE214,20:PR INT 

PR I NT, ”gg' KÉRSZ SEG I TSEGET ( I ) ? ":SYS49152 

IFPEEK(197)=64THEN10420 

W=PEEK<197) 

PR I NT , " ST g l II HHMHIHIHU I H ": SYS49217 
RÉM *# * KEPREMEGTETEST *#* 

FORI=1TO20:A=INT(RND(1)*15) 

POKE53280,A:P0KE53281,A +1 
FORJ=.TO20:NEXTJ 
POKE53280,.:P0KE53281,. 

FORJ=.TO20:NEXTJ:NEXTI 

FORI = . TO500: NEXT: I FW0 33THEN10720 

RÉM HELP 

FORI=23T0.STEP-1:P0KE781,I:SYS59903:NEXTI 
PR 1 NT"nC!"TAB ( 8 ) " A BIORITMUS HASZNÁLATA” 

PRINTTAB (8)" -" 

PRINT"®A SZÜLETÉSI DÁTUM ALAPJAN FELRAJZOLÁSRA" 
PR INT" KERÜL A BIORITMUS!" 

P R I N T" ■TrI FENT A LEELT EVEK ES NAPOK SZAMA," 
PR1NT"^LUL A DÁTUM NAPJAT AZ EGYMÁS ALA IRT" 

PR I NT" SZAMOK ADJAK. PL.: 2 ALATT 3 AZ 23" 

PR 1 NT "gg" A $ 

PRINT"SJw A BIORITMUS KINYOMTATHATÓ P-VEL!" 

PRINT"HA A P NEM INVERZ, NINCS NYOMTATÓ !" 

P RI NT" CS"A $ 

PR I NT"5Jfjl A PROGRAM ONCSONKITO TECHNIKÁVAL" 
PRINT" KÉSZÜLT, EZERT INDÍTÁS UTÁN A TELJES" 
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10670 PR I NT" LISTA MAR NEM TANULMÁNYOZHATÓ!" 

10680 PR I NT"SÍ MARADÉK RÉSZ KILISTÁZÁSA VÉG VÁLASZTÁS' 
10690 PRINT"UTAN LEHETSÉGES! INDÍTÁS GOTG1040-EL.” 
10700 PR I NT, "IjaSJ BILLENTYŰRE VAROK! "; 

10710 IFPEEK(197)=64THEN10710 

10720 PRINT"PWSgP r 43, 1 : PT44,8 : GOTO1030" 

10730 POKE63T7T3TpOKE198,1:PR INT"@":NEW 

READY. 


O 

O 

O 


o 

GRAFIKON RAJZA P0KE-0KKAL 

O 

o 


O 

0 

1040 CLR:DIMM%<13),M$(12):IC=1024+40*5 

1050 F0R1=1T013:READM%(I):NEXT:SC=55296+40*5 

O 

o 

READY. 

O 

o 

1550 RÉM *** BIORITMUS RAJZA *** 

1560 F0RK=.T038:P =INT(R+R*SIN((PS+K)*B)+.5)*40 

O 

o 

1570 P0KESC+K+P,3:POKEIC+K+P,24 

1580 E=INT(R+R*SIN((ES+K)*C>+.5)*40 

1590 P0KESC + K + E, 1 0 : P0KEIC + K + E,83 

O 

o 

1600 I=INT(R+R*SIN((IS+K)*D)+.5>*40 

1610 P0KESC + K+1,14:P0KEIC + K+I, 15 rNEXTK 

O 

o 

READY. 

O 



A második sor a RETURN billentyű egyszeri leütését szi¬ 
mulálja, törli a feleslegessé váló programrészt és kiváltja a 
(END-hez hasonlóan) return végrehajtását. Ekkor megkapjuk a 
program első részét, immár a törölt (toldott) rész nélkül. 

Feketével írva a fekete képernyőre mindez láthatatlan. 

Természetesen a két programrészt egy programba kell egye¬ 
síteni! Eddig csak az elvekről és az előkészítésről írtam! 

Az egyesítés lehet HELPT(append) segítségével, de ön is 
végrehajthatja parancs módban az alábbi lépésekkel: 

1. Töltse be a program első részét. 

2. Kérdezze le a program végét a már ismertetett mód¬ 
szerrel. 

3. Állítsa át a BASIC program elejét (10010 sor szerint, 
CLR nem kell). 

4. Töltse be a befejező részt. 

5. Állítsa vissza a BASIC terület kezdetét 
(POKE43,l:POKE44,8-cal). 

6. Listázhat, elmenthet. 

Megjegyzés: futtatás előtt mentse el a programot!! 

Persze a program elejének változtatása esetén a 10010 sorban 
szereplő értéket pontosítani kell! Ezért az ilyen megoldás a prog¬ 
ramot is védi, tiltó rendszabályaink, szakmai titkaink is eltüntet¬ 
hetők, ha autostarttal indítunk! 

Ha a POKE-okat nem vette ki a programból, csak a befeje¬ 
zés választása után listázhat. 

Újraindítás: RUN1040, vagy GOTO1040-el! 

Most már a DATASETT-es programjaiba is beépítheti a ba- 
sic betöltőket, szép bemutatkozó képernyőt tervezhet anélkül, 
hogy arra az adatkezeléshez szükséges memóriát pazarolná! 


A példaprogramot a COMMODORE ÚJSÁG-ból kölcsö¬ 
nöztem, az újság sok ötletét működőképesen beépítettem, és ext¬ 
rákkal kiegészítettem: 

— HARDCOPY-val kinyomtathatók az adatok; 

— pontos öröknaptár a születésnaphoz; 

— születési csillagkép meghatározása; 

— adatbevitel megkönnyítése, adatok teljes ellenőrzése; 

— ritkán használt választási lehetőség PEEK(197)-el; 

— speciális képremegtetések; 

— és sok-sok apró saját ötlet. 

Egy új programozási fogás, sok ötlet megismerése mellett 
lehetőség nyílik az olvasónak arra is, hogy kedves ismerősét 
meglephesse kinyomtatott, akár egész évre érvényes, biorit¬ 
musával. 

A programban a grafikonrajz megoldható POKE-ok segít¬ 
ségével is. Ez is kb. olyan gyors, mint a megküldött változat, de 
más ízlés szerint készült! Ha hasonló feladatnál a megoldások 
között kell választani, ez utóbbit ajánlom! 

A programban megváltoztatandó sorokat teljes egészében 
mellékelem. Aki az átírásba belekezd, ügyeljen arra, hogy a be¬ 
tűközök is számítanak! 

A grafikon bal felső sarkának kezdőcímei: 

IC = a képernyőmemória; 

SC = a színmemória. 

A jelek rajzát ehhez viszonyítva rögzíti a rajzoló rutin. A 
csonkoló sorban levő értékeket is át kell javítani! 

Tisztelettel: 

Mesterházi Sándor 


7 f: 

- 



















G 


PÁLYÁZAT 



Kollektív-szelvény kitöltő 


Tudom, hogy nagyon sok totó¬ 
program van forgalomban, de én ilyes¬ 
fajtával még számítógépes pályafutá¬ 
som alatt nem találkoztam. Ezért vet¬ 
tem a bátorságot a program megírá¬ 
sához. 

Ajánlom mindazoknak akik kis 
pénzzel nagy játékot szeretnének meg¬ 
játszani, mert a program kilenc kétesé¬ 
lyest egy hibára mindenféle változatban 
tud kezelni. 

Itt szeretném felhivni a figyelmet 
arra, hogy ennek a játéknak a hiba nél¬ 
küli megjátszása mintegy 5120 ,— Ft-ba 
kerülne. Az ezzel a programmal megírt 
640 ,— Ft-tal szemben. 

Programom lényege végül is az űr¬ 
lapok kitöltésében rejlik nem pedig a 
megjátszandó tippek árában és számá¬ 
ban. 

Ezen programot kis hozzáértéssel 
nagyon könnyen saját elképzelésünk 
szerint alakíthatjuk akár 8/5/1, 7/6/1 
vagy 10/3/1, 11/2/1 sőt még 13/0/1 
kétesélyes játékra is. 

Ezúton kívánok mindenkinek a 
programom felhasználásához sok sze¬ 
rencsét és nyereményekben gazdag 
hétvégét. 

Tisztelettel 

Keszericze Imre 


A program leírása: 

Rövid kis tájékoztató után a Spa- 
ce-billentyű megnyomására a program 
betölti a memória 49152 tárterületétől 
kezdődően a kiterjesztéseket valamint 
feltölti a változókat. 

A Főmenü megjelenése után be¬ 
kéri a játszani kívánt hét sorszámát, ami 
1 — 52 között lehet, majd rákérdez, hogy 
lemezről kívánjuk-e betölteni a tippe¬ 
ket. Amennyiben új hetet szeretnénk 
megjelölni, úgy az (N) betűt válasszuk. 
Az (I) betű megnyomására program 
automatikusan betölti az előzőleg le¬ 
mezre mentett tipposzlopot. 

Itt lehet még a tartalomjegyzékről 
listát kérni és a programból a (Q) betű 
megnyomására kilépni. Ezt a menüt a 


bal nyíl megnyomására a program bár¬ 
mely részéről el tudjuk érni. Mivel a be¬ 
jelentkezéskor egy ($) jel látható a kur¬ 
zor alatt és a program itt csak számokat 
fogad el, ha hibát ejtünk, a bal nyíl meg¬ 
nyomására a ($) jelet újra generálja. Le¬ 
mezkezeléssel kapcsolatosan ejtett 
hiba esetén a program hibajelzést ad. 


A főmenüt követően egy almenü 
jelentkezik, ahol a tippjeinket meghatá¬ 
rozhatjuk. Ezen résznél a program csak 
1, X, 2 jeleket fogad el. Valamint kizár 
minden hibalehetőséget. Pl. az 11, XX 
vagy 22 jelbeadást nem fogadja el, de 
a fordított tippelés megengedett. Pl. 
1X-X1, 12-21 vagy X2-2X. 


100 
105 
O 110 
115 
120 
0125 
130 
135 
O 140 
145 
150 
O 155 
160 
165 
Q 170 
175 
130 
G 185 
190 
195 
n 200 
U 205 
210 
215 
220 


O 


O 


O 


O 


O 


O 


O 


O 


O 


F; EM **** * * * * * * * * * * * * * * * * * * * * * * ***** * 
RÉM * KOLLEKTÍV SZELVÉNY KITÖLTŐ * 
RÉM * KILENC KETESELYES EGY HlBARA * 
RÉM * KÉSZÍTETTE; KESZERICZE IMRE * 
RÉM * 1993 * 

R E i'l ******** * * ** * * * * * * * * * * * * * * * * * * * * 


POKE808.234 
GOSÜB20B5 
DIMT T < 15) .TAT (25) 
GOSUB2130 

RF M * * * * * * * * * * * * 
RÉM * VÁLTOZOL * 

R E M * * * * * * * * * * * # 

PE--49152; IN=PR+31 
1)1=53000; DET=" 1X2 
ST="0123456789" 
51..0 AD" 

Sí:; VEM?= 

KI! " 

ssi: ki :i * 


. 0 


TTT (17) , FT (15,17) 


SAf -•" BEA VE 

■1 


230 
235 
240 
245 
250 
255 
260 
265 
270 

O -J c- 
280 
285 
290 

300 
305 
310 
315 
„ 320 
O 325 
330 
335 
340 
345 
350 
O 355 
360 
365 
O 370 
375 
380 
O 385 
390 
395 
400 
405 
410 
415 


II 


LOT- 
VA*=" 

VC í-"-'" 
NT=" 

EL4=" 
E2T = " 
Vlt=" 
V2$=" 
V3T-~" 
V4T-- " 
EMI- " 
GOT0440 


R E M * * * * * * * * * * * * * * * 
RÉM * SZUBRUTINOK * 
RE M * * * * * * * * * * * * * * * 


Cl- 










.ML..L. 

t 

KESZER 

IC Z E 

; IMRE : 

l 993 " 




33, DT 


DT= " *3Ö HIBA ! ÜSS: SYSPR 
FORK—1TO1500;NEXTK 
DT=" SYSPR, 1,33,1)4 

RETURN 

DT = "f5a HIBA 1 *25; SYSPR, 11 ,27,DT 

F0RK=1T01500;NEXTK 
SYSPR,11,12,E1T+E1T 
RETURN 

DT="SMEGFELELNEK ÍGY AZ ADATOK 
JYSF'F 


+NT 


..0,DT 

GETAT:IFAÍ-""THEN335 
IF"ATHENCLOSE1 : GOTO 185 

RETURN 

D$="■MELYIK SORSZÁMÚT FIZESSÜK BE; !il 

SYSPR,1,0,DT 

RETURN 

DT="®a A NYOMTATÓ NINCS BEKAPCSOLVA 
SYSPR,1,0, DT 
FORK—ITű3000:NE XTK 
RETURN 

DÍ="M . KE TE SE LY; FI 
SYSF'R , 4,24 , DT; S1 
RETURN 

DT="*2„ KETESELYi 
SYSPR,6,24,DT;52 
RETURN 
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420 

425 

430 

435 

440 

445 

450 

455 

460 

465 

470 

475 

480 

*85 

490 

495 

500 

505 

510 

515 

520 

525 

530 

535 

540 

545 

550 

555 

560 

565 

570 

575 

580 

585 

590 

595 

600 

605 

610 

615 

620 

625 

630 

635 

640 

645 

650 

655 

660 

665 


RF M * * * * * * * * * * 
RÉM * FŐMENÜ * 
F<E M * * * * * **** * 

: 


P0KE646 
PR INT"i 
PR INT"! 
PR INT"! 
PR INT"! 
PR INT"! 


15:M~0 

TOTOSZELVENYT l< I T0L.T0 


PROGRAM-MPS1230 


5P'"; 

9/4/1/16 -• KETESELY/FIX/HIBA/SÍ EL VÉNY 53 "5 

"S 


PR INT "5^ 

PR INTSPC (7) " Y: " FIM* 

PRINT";*WÍ-" 

PR INT "PM HÉT: ■ SÍT " 

PR INT"-" 

SYS IN , 1 1,7,2 , S* , HE* , " +Q " , FL7. 
HE-VAL(HE*) 

IFFL*/.= 1 THEN 185 
I FFL‘/.=2THENSYS5B26 0 
IFHE*="*"THEN555 
IFHE<1ORHE>52THEN495 
GOTO610 

R E M * * * * * * * * * * * * * * * * * # * * 

RÉM * DlREKTORY OLVASD * 

RE M *********** ********* 


O 

O 

O 

O 


PR I NT " 61; 
SYSDI ' 
PRIIMT-WiTIAB 
G0SUB335 


(18) " .S! RETÜRN" 


IFA*< >CHR* (-13) THEN570 
GOTO185 

R E M * * * * * * * * * * * * *** * * * * * * * * * * 
RÉM * FILE BETÖLTÉS DISKRÜL * 
REM ************************* 


SYSPR,11,12, 
G0SUB335 


"+L0*+N* 


IFA*="N"THEN860 
IFA*< > " I" THENGOSU8305 s GÜT04955 
Sl-0:S2=0 
QPEN1,8,15,"r‘ 

0PEN2 8,2,HE*+". HÉT,P,R" 

I NF'UT# 1,14: IF H--0THEN660 
CL0SE1:CLŐSE2 
GQSUB305:G0T0495 
F0RI=1T014 
INPUT#2,T* íI) 


o 

670 


675 


680 

o 

685 

690 


695 

o 

700 


705 


710 

o 

715 

720 


725 

o 

730 

735 


740 

o 

745 


750 


755 

o 

760 

765 


770 

o 

775 

780 


785 

o 

790 

795 


800 

D 

805 


810 


815 

0 

82 0 

825 


830 

o 

835 


NE XT 

INPÜT#2,SÍ 
INPUT #2,S2 
M—1 

CL.0SE1: CL QBE 2 
GOSUB860 

RE M * * * * * * * * * * * * * * * * * * * * * * * * * * * 
RÉM * TIPP KIIRASA KÉPERNYŐRE * 
R E M * * * * * * * * * * * * * * * * * * * * * * * * * * * 

j==0 

FORI=47021:J=J+1 
SYSPR,I,6,T* <J) 

IFI “6 GR I « 100 RI = 140RI = 19THENI = I +1 
NE XT 

GGSUB385:GOSUB400 
GOTO1175 

R EM * * * * * * * * * * ** * * * * * * * * * * * 

RÉM * FiLE MENTESE DISKRE * 

REM *********************** 

ÓPEN1,8,15,"I 1 

PR INT# 1 , " S0: " HE* " .. HÉT " 

0PEN2,8,2,HE*+". HÉT,P,W" 

FÓR1=1Tű14 
PRINT#2,I*(I) 

NE X T 

PRINTW2,SÍ 
PRINT#2«S2 
CLŐSE1:CL0SE2 
RETÜRN 


O 



840 

RFM *************** 

o 


845 

RÉM * ADATBEVITEL * 


850 

R F M * * * * * * * * * * * * * * * 


o 

855 

860 

PRINTV3*; 

I FM= 1THENPRI NT " S!A " HE* " . HÉT TIPPJEI ! " : GO 10875 

PRINT"SZEREM A "HE*". HÉT TIPPJEIT!" 

o 


865 


o 

870 


875 

D*="|II5J: SYSPR, 1 ,32,D* 

o 


880 

PRINTV4* 


o 

885 

PRINT"M«i'I«H'l; 

o 


890 

FÜR1 = 1TOí 4 


895 

IFIK10THENPRINT" 


o 

9 00 

PR INT "öl "II. M 

o 

905 

IFI =30R I ~~6OR I =90R I = 13THENPRI NTV1 * 


910 

NE XT 


D 

915 

I FM= 1THENM---0: RETÜRN 

o 


920 

1=3:J=0 


925 

1=1+1:J=J+1 



930 

IFI=70RI=11ORI=1SORI=20THENI=I+1 

SYS IN , I , 6, 2, DE* , T* , " +■" , FL7. 

I FT*= " XI " THEIMT*= " 1X " 

o 

CJ 

935 


940 


o 

945 

IFT*="21 "THENT*= " 12." 

o ' 

950 

IFT *= "2X “ THENT*="X2" 


955 

IFT*=" 1"THENT*="1" 



960 

IF'T*-" X"THENT*=" X" 

o 

(J 

965 

IFT*-“" 2"THENT*="2" 


970 

IFFL7.--1THEN185 



975 

IFT*--" "0RT*=" 11 "0RT*= "XX" 0RT*= "22"THENG0SUB285 : G0T0935 

o 

o 

980 

T* (J ) -•'!'* 


985 

IF J = : 13 THEN 1020 



990 

G0T0925 


o 

995 

s 

o 
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i 

I ÉÉ É ; 


. 


PÁLYÁZAT 


o 1000 

RE M * * ******* * ****** * ** ******* * 

O 


1005 

RÉM * A 9/4 ESELY ELLENŐR Z EBE! * 



1010 

R fc M * * * * * * * * * * * * * * * * * * * * * * * * * * * 


o 

1015 

! 

o 


1020 

R*= " " 



1025 

F'ORJ=l 1013; Rí =R*+T* <J) ; NEXTJ 


0 

1030 

IFL..EN <R.*)< >22THENGOSUB2851 G0T0885 

o 


1035 

1040 

SYS IN ,21,6,1, DE* .. T* , " , F'L.7, 

I FT*-" TMENGÖSUB285 : GOTO 1 035 


o 

1045 
1050 
1055 

T* (1 4 ) =T* 

I FFL7.~ 1THEN185 

G8SUB325 

T FA*- " N " THEN86 0 

o 

O 1(360 

ü 


1065 

IFA*< >'■ 1 11 THENG0SUB285: GOTO 1055 



1070 

s 


O 1075 

R E M * * * * * ** * * * * * * * * * * * * * *** * * * * * * 

o 


1080 

RÉM * A BEFIZETETT KETESELYESEK * 



1085 

R E M * * * * * * * * * * * * * * * * * * * * * * # * * * * * * 


o 

1090 

: 

o 


1095 

GGSUB350 


O 

1100 
1105 

SYS IN , l , 30.2 , S*, S1 * , 11 , FL7. 

SIÓVAL(SÍ*) 

o 

1 110 

I F'FL7.~ 1THEN185 



1115 

1FS1 < 1 ÖRS 1 > 130RS1 *•==" " THEMGQSUB285: GOTO 1095 

O 

1120 

IFLEN ( T*(SÍ) )~ 1THEMG0SUB285 : GOTOi095 

o 

1125 

G0SÜB3B5 


1 130 

GOSUB350 


O 

1 135 

1140 

SYS IN, 1,30,2,5*, S2*, ,FL7. 

S2=VAL(S2*1 

o 


1 145 

IFFL7.-1 THEN 185 


ü 

1150 

IFS2<1ÖRS2 > 13QRS2*= "" THENGQSUB285 ; GOTO11 

30 o. 

1155 

IFS2=S1THENG0SUB285 : GOTOí130 


1160 

IFLEN ( T* ( S2 ))= 1THENG0SUB285 : GOTO1130 


O 

1165 

GQSUB400 

o 

1170 

I FS 1 >S2THENS1»S2 s S2*VAL ( S1 *) 



1175 

GQSUB325 


O 

1180 

IFA*= " N " THEMD*= " ": SYSPR, 

4,24,D* ; SYSPR,6,24,D* : GOTO1095 

0 


1185 

IFA*< >" I " THENG0SUB285:GOTO 1175 


O 

1190 

SYSPR,1,0,SA*+N*+E2* 

o 


1195 

gosübJsS 



1200 

IFA*="N"THEN1240 


O 

1205 

IFA*< >" I " THENG0SUB285 : GOTO1195 

o 


1210 

G0SUB785 



1215 

: 


O 

1 

RE M * ******* ** * * *** ** 

o 


1225 

RÉM * TIPP KODOLASA * 


1230 

RÉM ***************** 


O 

1235 

1240 

1245 

PR I NT " TJE! a*:! -a COMPOSE " : J=0 

POR i=i T014 : POKE1024,I 

IFI=S1ORI=S2THEN1305 

IFT* ( I )=" 1"THENT* ( I ) =TA*(22) 

o 


O 

1250 

1255 

o 


1260 

IFT*(I)="X" THENT* ( I )=TA*( 23 ) 


o 

1265 

I FT* ( I ) = "2 " THENT* ( I ) =TA* ( 24 ) 

o 

1270 

IFLEN(T* ( I ))< >2THEN1305 



1275 

J=J+1 


o 

12.80 

IFT* (I) -- " 1X "THENT* ( I ) =TA* ( J ) 

o 


1285 

J=J+1 



1290 

IFT* ( I ) =" 12"THENT*(I ) =TA$ ( J ) 


o 

1295 

J=J+1 

o 


1300 

IFT* ( I ) = " X2" THENT* ( I ) «TA* ÍJ ) 



1305 

NE XT 


o 

1310 


o 


1315 

R E M * * * * * * * * * * * * * * * * * 



1320 

RÉM * TOMBFELTÖLTÉS * 


O 1325 

R EM ** *********** * ** * 

o 


1330 

í 



1335 

FÜR I = 1TO16 : POKE 102.4,1 


O 

1348 

1345 
1350 

FÓR J = 1TO 14 : POKE 1 025, J 

IFJ=S1THENF*(J,I ) =T* ( J ): GOTO1360 
IFJ-S2THENF* ( J,I ) =T* < J) : GOTO1360 

F* ( J , I )-TI ID* ( T* (J í , 1 * I , 1 ) 

NEXTJ,I 

o 

O 

1355 
1360 

o 


1365 

i 


O 

1370 

R E M * * * * * * * * * * * * * 

o 

1375 

RÉM * l-IARD COPY * 



1380 

R EM * * ******* **** 


o 

1385 

ü 

o 


1 390 

PRIMTV3*; 



1395 

PR INT" sKSíPERNYORE VAGY M'tSíVDMTATORA " 


o 

.1.400 

1405 

D*--"Ii iíJ: SYSPR , 1,32, D* 

PRINTV4* 

o 


1410 

G0SÜB335 



A tizenhárom tipp beadása után 
mielőtt a pótmérkőzést meghatároz¬ 
nánk, ellenőrzi a kilenc kétesélyes és 
négy fix meglétét. A program csak hi¬ 
bátlan tippbeadást fogad el. Hiba ese¬ 
tén a tippelést újra kezdi, de az előzőleg 
beadott tippeket nem törli. Ez nagy¬ 
mértékben megkönnyíti a hiba kijavítá¬ 
sát, mert ott ahol jók a tippjeink csak a 
RETURN billentyűt kell megnyom¬ 
nunk. 

Továbblépve a majdan befizetett 
kétesélyesek sorszámát kell megad¬ 
nunk. Ezen résznél kell beírnunk, hogy 
melyik legyen az a két kétesélyes, ame¬ 
lyet be szeretnénk fizetni, hogy a sor¬ 
számot milyen sorrendben adjuk meg 
az nem számít. Miután mindent jól 
meghatároztunk, tipposzlopunkat akár 
lemezre is menthetjük. A fiié neve a hét 
sorszáma lesz. Itt vigyáznunk kell arra, 
hogy az előzőleg ilyen sorszámú héttel 
elmentett tippünket a program automa¬ 
tikusan felülírja. 

Tippjeinket a program néhány má¬ 
sodperc alatt kódolja és máris készen áll 
a nyomtatásra. Amennyiben a képer¬ 
nyőre kérjük a nyomtatást, úgy nyom¬ 
tathatunk magunknak egy teljes listát a 
megjátszandó tippekről. Ennek a prog¬ 
ramrésznek különösen akkor vesszük 
nagy hasznát, ha többen totózunk, 
mert mindenkinek könnyedén tudunk 
listát készíteni a már felbontott tipp- 
jeinkről. A listát háromféle méretben 
tudjuk kinyomtatni. 

Végezetül a nyomtatás menü vá¬ 
lasztásával az űrlapokat tölthetjük ki. Itt 
a program egymás után automatikusan 
kéri az űrlapokat. A nyomtatás menü¬ 
ből a fel nyíl segítségével vissza tudunk 
lépni az előző menüre, de természete¬ 
sen a bal nyíl megnyomására a főmenü¬ 
re is visszaugorhatunk. 

Az űrlapnyomtatás menünél még 
szeretném megemlíteni, hogy meg tud¬ 
juk szakítani a folyamatos nyomtatást a 
SHIFT/SPACE billentyű lenyomásá¬ 
val. Ezen programrészt azért építettem 
a programomba, hogy hibás űrlap¬ 
nyomtatás esetén ne kelljen újra nyom¬ 
tatni mind a tizenhat űrlapot, hanem a 
sorszám beadásával mi is meg tudjuk 
határozni, hogy a nyomtatás hol folyta¬ 
tódjon. így akár egyenként és össze¬ 
vissza is nyomtathatunk! 

Összegezve: a program ezidáig a 
totókollektívánkban jól vizsgázott és 
előszeretettel használjuk a totószelvé¬ 
nyeink kitöltésére. Mi egy befordított 
példányt használunk, ami így igen 
gyors működést tesz lehetővé. 

Ajánlom programomat minden 
kedves számítógépes totós felhasz¬ 
nálónak! 


JULI-AUGUSZT- " 10 







Sitii 




PÁLYÁZAT 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


14:15 
1420 
1425 
1430 
1435 
1440 
1445 
1450 
1 455 
1460 
1465 
1470 
14 75 
1480 
1 4 85 
1490 
1495 
1500 
1505 
1510 
1515 
1 520 
1525 
1530 
1535 
1540 
1545 
1550 
1555 
1560 
1565 
1570 
1575 
1580 
1585 
1590 
1595 
1600 
1605 
1610 
16 15 
1620 
1625 
1630 
1635 
3.640 
1645 
1650 
1655 
1660 
1665 
1670 
1675 
1680 
1685 
1690 
1695 
1700 
1705 
1710 
1715 
1720 
1725 
1730 
1735 
1740 
1745 
1750 
1755 
1760 
17*5 
1770 
1775 
1780 
1785 
1790 
1795 
1800 
1805 
1810 
1815 
1820 
1825 
1830 
1035 


IFA*= “ N “ THEMGQSUB1660; GOTO 1700 
I FA*< > “ K" THEMG0SLJB285: GOTO 1410 
J---3 

FÓR1=1TO14:J-J+1s9=1: TT*=" " 
IFI>9THENV=0 

I FJ=7QRj=1.1OR J = : 1 SOR J=20THENJ = J +1 
GOSUB1470 

SYSPR. J , V, " fcJSI " II- SÍ " s TT* 

IFI --30RI • * OR I »90R I - 13THENPRINT92* 
NEXT.l 
GOTO1500 
IFLEN (Tí ( I) >• 

FüRk= 1 ! 016 

TTÍÍKÍ'HIIDÍ cr*< 

T* (!<) i- 


O 


O 


O 


'HENTT*=T* < I>+' 
1) 


BBEFIZETETT KETESELYESBfc RETURN 


I>,1*K, 

II II 



TT*--TT *+ 

MEXTK 
RETURN 

PR 1 M"i “ süHRUZSET - a(4S^RDC0PY " ; E1 * 

G0SÜB335 
IF A R " THEN1 "590 

IFA*< >"H" THEN8081JB285: GOTO 1505 
PR I NT " SOTJA PAPÍR RENDBEN - I! a|I !{/ ^-ISSIl 
GOSUB') 35 
I FA*= ” N " THEN 1390 
IFAT <> 1 1"THENG03UB285:GOTO1525 
OPEM 1 ,4 

PRINT#1:HV-PEEK(144) 

IFH9=128THENCL0SE1:G0SUB365sGOTO!500 

PRINT ,, SWariSSrNI . sNHORMAL - 3DSSÜPLA - ESÉSÉT 

GOSUB335 

IFA*= "M" THENB1 *=9C*+ 11 4 " s B2*=VC*+ "0" : GOTO 1590 
IFA$="N"THENB1*=9B*:B2*=B1 *sGOTO1590 
1FA*="R"THENCLOSE1;GOTO1390 
IFA*< >"D"THEMGOSUB285:GOTO1560 
B1 $=V A $: B 2 * ~ V B * 

PR I NT4 1 , B1 * " " HE* " HÉT " SPC < 20) " 6 40--FT " 

PR I NT# 1,91 *+ "-" : PR I NT# 1 

FÜRI=1TO14:TT*="":Q*=" " 

GOSUB1470 
IFI)9THENQ*”"" 

PR I NT# 1 , Q*; I “ II.. "TT* 

I F í --3QR ! =6 OR I =90R I * 13THENPRI. NT# 1,92* 

NE XT 

PR I NT# í , B2*: CL.0SE 1: GOTO 1390 
: 

R E M * * * * * * * * * -x- ■* * * * * *** # * 

RÉM * ŰRLAP NYOMTATÁSA * 

R E M #* * * * * * # # xx- * * * * * * * * * 

80= 1 

PRINT"SISBJÍEREM AZ ŰRLAPOT A NYQMTATDBi 
GOSUB335 

IFA*=CHR*(160)THEN1870 
IFA*="T"THENCLOSE1:GOTO1390 
I FA*< >" " THENG0SUB285; D*= " M SF'ACE 
PRINT"ÜfB3 XILLEKT19 SZELVÉNY NYOMTA 
RETURN 
OPEM1.4 
FÓRI=B0T016 

GETA*:IFA*=CHE*(160)THEN1870 
PR INT# 1; HV : =PEEK (144) 

IF H9= 128THENCL0SE1: GOSUB365: GOTO 1390 
D*="LAP;":SYSPR,1,33,D*; I 
PR INT#1,CHR*(14):K=0 
PRINT#1íPRINT#1 

IFLEN(HE*)=2THENU1=14:U2=6:GOTO1750 
U 1 = 15: U 2= : 8 

PR 3: NT# 1 , " " HE*SPC < U1) HE*SPC (IJ2) HE* 

PRINT#1,CHR*(15) 

FÓR 10= 1T06 s PR INT# 1: NEXTK 
FÓRJ=11014 
GOSUB1945 

PRINT# 1 ,SPC ( 6 ) 5 F* (J , I) ; SPC (2.2);F*(J , I) ; SPC (11) ; F* (J , I) 

IFJ—&T HEN1800 ' ' ’ 

IF J = 13THENPRI NT# 1 

GETA* s I FA*--CHR* (160 ) THEN 1870 

PRINT#1 

NE XT,; 

F0Rt0= 1T05 s F'RINT#! : NEX i"K 

PR1NT#1,SPC( 6 );C*(7);SPC(12);"4”:SPC( 8 );C*(7);SPC(10);C*(7) 
PR INT#1,SPC <18>;"40 ' -";SPC(23)s"4";PRINT#1' 

PRINT#1,SPC(12);"MEGY9EN ' -";SPC(27);"40 

IFI=1 í THENCLOSE1sGOTO1840 
GOSUB1660 
NEX TI 


SÍ: SYSPR, 
TASA! ÜB 


SF'ACE 


1,33,D*:GOTO1670 


O 


O 


o 


o 


o 


o 


o 


o 


o 


o 


o 


o 


o 









PÁLYÁZAT 




o 


o 


o 


o 


o 


1840 
1845 
1850 
!. 855 
1 868 
1805 
1870 
1875 
1.880 
1 SS 5 
1890 
1895 
1900 
1 905 
1910 
1915 
1920 
1925 
1930 
1935 
1940 
1945 
1950 
1955 
1960 
1965 
1970 
1975 
1980 
1 985 
1990 
1995 
2000 
2005 
2010 
2015 
2020 
2025 
2030 
2035 
2040 
2045 
2050 
2055 
2060 
2065 
2070 
2075 
2080 
2085 
2090 
2095 
2100 
2105 
2110 
2115 
2120 
2125 
2130 
2135 
2140 
2145 
2150 
2155 
2160 
2165 
2170 
2175 
2180 
2185 
2190 
2195 
2200 
2205 
22 10 
2215 
2220 
2225 
2230 
2235 
2240 
2245 
2250 
2255 


GOTO1390 
s 

P p (Vj * *.* * X. # U * * * * * * * * * * * * * * * 

RÉM * NYOMTÁTÁS MEGSZAKÍTÁS * 
REM ** ************* ********** 

CL0GE1 
DT="* STOP 1 
"BPR, 


SYSPR.1,33,D 
PRINT' 


f 


0L..YTATA3 
Síi?, SÜT , " - 


. SORSZÁM: «; SO 

■“ *FL7. 


SYS IN,4,21, 

SG=VAL. (S'Of:) ' 

1 FFL.'X,=1THEN185 

I f SÜ< 1ORBG > 16 ÍHENÜUSUB285s GOTO 1875 
SYSPR,4,0,E1T+E2T 
GüSUB1665”GOTO1700 
: 

p F M * * * * * * * * * * * * * * * * * * * * * * * * 

RÉM * NYOMTÁTÁS MASZKOLÁSA * 

R EM * * * * * * * * * * * * * * * * * * * * * * * * 

1 X"THENFT<3 
12"THENFT(J 
X2" THENFT (J 
1"THENFTÍJ 
THENFT (J 
THENFT<J 


I)’ 
I); 
I) ‘ 
i ) < 
IF 
I) 


"X' 

I! '"1 I 


IFFT <J 
IFF*(J 
IFFT(J 
IFFT CJ 
IFFT(J 
IFFTÍJ 
RETURM 

ü 

RÉM ******** 
RÉM * HELP * 
RÉM ******** 

PRINTCHRT(8); 
PR I NT H |k— 

PR INT"ÉH 


I)=Cfí1) 
Í)=C$(2) 
I) —CT í 3) 
í)=CT(4 > 

I>*CT<5) 


I)-CT(6: 


A program működése 


135 — 

145. 

150- 

155. 

185— 

255. 

285- 

410. 

440- 

525. 

555- 

580. 

610— 

695. 

725- 

755. 

785- 

830. 

860- 

990. 


ug- 


Képernyőszín meghatározás, 
rás a help menüre. 

Helyfoglalás a változóknak, majd 
kiterjesztések beolvasása. 
Változók meghatározása, ugrás a 
főmenüre. 

A programban többször használt 
szubrutinok összessége. 

Főmenü. 

Disk directory gépi kódú program 
hívása SYS53000= SYSDI 
Load — fiié betöltése lemezről + 
hibavizsgálat. 

Lemezről betöltött fiié kiírása kép¬ 
ernyőre. 

Savé — fiié mentése lemezre. 
Adatbevitel — sorszámok kiírása 
ciklusban a SYS49152 tárcímen 
lévő input gépi kódú program 
meghívása. 


'J3Í1 ISJ3L-F' 




PROGRAM LEHETŐVE TESZ I 




HOGY KQLLEK-TIV 
E"GV Hl-BARA" ; 

PR INT" MINDEN NEUE Z BÉG NÉLKÜL MEGJÁTSZUNK. 11 
PRINT" a| FELHASZNÁLÓJÁNAK MEGKÖNNYÍTI A TOTO-"; 

PRINT"SZELVÉNYEK 1?:ITÖLTÉSÉT ES LEHETŐSÉGET AD" 

PRINT"A TIPPOSZLOPOK LEMEZEN VALÓ TÁROLÁSARA." 

PRINT"lő 7Ü PROGRAMBAN HASZNÁLATOS DE NEM JELÖLT"; 
PR I NT " fi ILLENT YUZETEK A KŐVETKEZŐK: " 

pr i nt " :>Il r-----1"; 

PRINT" ÍS1 (•<-) - 4.OMENU W Í-.--Í -• ** LOP ki" 

PRINT"k I I"; 

PRINT" Ia (t) - a(ALMENU 5I<«) ~ 3"' ILÉPÉS ki" 

PRINT"k l --J”; 


PRINT" 


fc. 


ISZNALATAHOZ 


PR INTSPÜ < 24 r'ílh'EBZER ICZE 
GETATs IFATO" ir THEN2090 
RETURM 
END 
: 

RE M * * * * * * * * * * * * * * * * * * * * * * 
RÉM * PRINT AT & INPUT * 
R EM ** * * ** ********** ****** 


SOK SIKERT 
MR EK 


KIVAN A PROG-RAM KÉSZÍTŐJE: 


O 


o 


o 


o 


o 


m 


P0KE55296,1 
PRINTCHRT (9);'_ 
FÜR1=49152TQ497 
READA 

POKEI,A;POKE1024,A 
NE XT 
: 

REM *********** ** 
RÉM * DIREKTORY * 
RÉM ************* 

FÜR I ---53000T05306 5 
READA 

POKEI,A:POKE1024,A 
NE XT 
s 

REM ***** ******* 
RÉM * ÁLLANDÓK * 

R E M * * * * * * * * * * * -* 

FÓRI=1T024 
READTAT(I) 

NEXTI 

FÓR1=1107 
READCT(I) 


7XTENSI0N 1 






1020—1065. A kilenc/négy ellenőrzése T$ vál¬ 
tozó összeadásával. 

1095—1210. A befizetett kétesélyesek be¬ 
kérése. 

1240-1305. A tippek behelyettesítése a ki- 
lenc/négy-nek megfelelően. 

1335—1360. A tippek szelvényenként! megha¬ 
tározása. 

1390 — 1630. A teljes tipposzlopok, mind a ti¬ 
zenhat nyomtatása. 

1660 — 1840. Az űrlapok kitöltése. 

1870 — 1915. Az űrlapnyomtatás megszakítása 
és tovább folytatása. 

1945 —1975. A nyomtató maszk a 2845-ös data 
soroknak megfelelően. 

2005-2100. Help. 

2130 — 2855. A gépikódú részek Input/Print 
AT/Direktory beolvasása. 
Elhelyezése a 49152, ill. 53000 tár¬ 
címekre. 

A tömbváltozók feltöltése a ki- 
lenc/négy-nek megfelelően. 
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PÁLYÁZAT 


Cf 


2260 

2265 

2270 

2275 

2280 

2285 

NEXTI 

RÉTIJÉN 

: 

RÉM *** 

DATA 32 

ADATOK ***• 

.253,174, 32 

, 235 

, 183 

, 138 

2290 

DATA 

168 

, 166 

,, 20 

VV/j, 

, 2 5 

, 176 

, 14 

2295 

DATA 

192 

, 40 

, 176 

* “0 

, 24 

, 32 

, 240 

2300 

DATA 

255 

, 32 

'-i t;:r 

n iJO 

, 174 

76 

160 

, 170 

2305 

DATA 

76 

, 72 

, 178 

, 169 

, 0 

, 141 

, 52 

2310 

DATA 

3 

, 169 

, 0 

, 141 

, 55 

u 

, 14 1 

2315 

DATA 

56 

3 

, 133 

, 248 

, 32 

, 166 

, 179 

2320 

DATA 

165 

,214 

, 72 

, 32 

, 253 

, 174 

, í 

2325 

DATA 

158 

183 

,224 

, 25 

, 176 

m s... 

, 138 

2330 

DATA 

133 

, 247 

, 10 

, 10 

24 

,101 

, 247 

2335 

DATA 

133 

, 247 

, 160 


, 6 

, 24'" 

, 38 

2340 

DATA 

248 

, 136 

208 

249 

, 32 

, 233 

, 174 

2345 

DATA 

32 

, 158 

183 

, 224 

,, 40 

, 176 

, 193 

2350 

DATA 

138 

, 24 

, 101 

247 

133 

, 247 

, L 14 

2355 

DATA 

r ? 

, 230 

, 246 

24 

, 173 

, i 36 

.. 

2360 

DATA 

101 

,248 

, 133 

248 

, 32 

, 5 J 

, 174 

2365 

DATA 

32 

; lse 

, 183 

, 202 

, 224 

, 127 

, 176 

2370 

DATA 

164 

, 142 

, 53 

, 8 

, 32 

, 255 

, 174 

2375 

DATA 

7H 

•J 

, 158 

, 173 

, 32 

, 163 

, 182 

, 14 :i. 

2380 

DATA 

54 

3 

, 134 

, 249 


, 250 

, 32 

2385 

DATA 

253 

, 174 

, 32 

, 1.39 

, :i. 76 

, 32 

121 

2390 

DATA 

0 

,201 

44 

, 208 

, 16 

, 32 

, 253 

2395 

DATA 

174 

, 32 

, 153 

173 

, 32 

, 163 

, 182 

2400 

DATA 

141 

55 

, 3 

, 134 

, 251 

, 132 

'~\ T-T 
n 

2405 

DATA 

172 

, 52 

3 

, 177 

,247 

, 48 

, 4 

2410 

DATA 

9 

, 128 

208 

o 

■ Á.. 

, 41 

, 127 

, 143 

2415 

DATA 

247 

, 160 

, 120 

, 162 

, 251 j 

, 165 

, 198 

2420 

DATA 

208 

, 8 

, 202 

, 208 

, 249 

, 136 

, 208 

2425 

DATA 

244 

, 240 

, 225 

, 169 

, 0 

, 133 

, 198 

2430 

2435 

DATA 

172 

, 3? 

3 

177 

,247 

, 41 

, 127 

DATA 

145 

247 

, 173 

, 119 


,201 

, 13 

2440 

DATA 

208 

, 3 

, 76 

• x.. 

l 193 

,201 

32 

2445 

DATA 

240 

, 27 

, 201 

, 29 

, 240 

, 41 

, 201 

2450 

DATA 

157 

, 240 

, 51 

, 20.1 

, 147 

, 240 

, 65 

2455 

DATA 

201 

, 19 

, 240 

, 71 

, 201 

, 20 

, 240 

2460 

DATA 

75 

,201 

, 148 

,240 

, 99 

, 76 

, 150 

2465 

DATA 

193 

,201 

, 64 

, 144 

, 9 

,201 

, 192 

2470 

DATA 

144 

, 2 

,233 

, 64 

, 56 

, 233 

, 64 

2475 

2480 

DATA 

172 

; 2 li 

i 3 

, 145 

,247 

, 173 

, 52 

DATA 

3 

, 53 

, 3 

,240 

, 3 

,238 

2485 

DATA 

52 

, 3 

, 76 

, 168 

, 192 

, 173 

, 141 

2490 

DATA 

2 

; 201 

, 2 

; 240 

, 90 

, 173 

, 52 

2495 

DATA 

3 

, 240 

, 3 

, 206 

, 52 

, 3 

, 76 

2500 

DATA 

168 

, 192 

, 172 

53 

, 3 

, 169 

, 32 

2505 

DATA 

145 

,247 

, 136 

, 16 

,249 

, 169 

, 0 

2510 

DATA 

141 

, 52 

, 3 

, 76 

, 168 

, 192 

, 172 

2515 

DATA 

52 

, 3 

, 240 

, 53 

, 177 

,247 

, 136 


2520 

DATA 

145,247 

,200 

, 200 

, 204 

, 53, 3 

O 

2525 

DATA 

144,244 

,240 

, 242 

, 172 

, 53, 3 


2530 

DATA 

169, 32 

, 145 

, 247 

, 208 

,192 172 


2535 

DATA 

53, 3 

, 177 

,247 

,201 

, 32,208 

O 

2540 

DATA 

21,240 

6 

17? 

247 

200 145 


2545 

DATA 

247,136 

, 136 

, 48 

, 5 

,204, 52 


2550 

DATA 

3,176 

,242 

, 200 

, 169 

, 32,145 

O 

2555 

DATA 

247, 76 

, 168 

, 192 

, 172 

, 53, 3 


2560 

DATA 

177,247 

, 201 

, 32 

, 208 

3 136 


2565 

DATA 

16,247 

, 204 

, 53 

, 3 

240 1 

O 

2570 

DATA 

200,140 

, 52 

, 3 

, 76 

168 192 


2575 

DATA 

160, 0 

, 72 

, 177 

, 249 

,170 104 


2580 

DATA 

224, 11 

, 208 

, 11 

, 201 

, 65,144 

O 

2585 

DATA 

25,201 

, 91 

, 176 

, 21 

, 76,253 


2590 

DATA 

192,224 

7 

208 

, 10 

,201 193 


2595 

DATA 

144, 10 

20 i. 

219 

, 176 

, 6,144 

0 

2600 

DATA 

239,209 

,249 

, 240 

,235 

,200,204 

2605 

DATA 

54, 3 

, 208 

,212 

, 172 

, 55, 3 


2610 

DATA 

240, 12 

, 160 

0 

, 209 

251 240 

O 

2615 

DATA 

9,200 

, 204 

55 

3 

,208,246 

2620 

DATA 

76,168 

, 192 

, 200 

, 140 

, 56 3 


2625 

DATA 

208 0 

, 169 

, 0 

, 133 

,198,172 

o 

2630 

DATA 

53, 3 

,177 

247 

,201 

, 32 208 

2635 

DATA 

5,206 

, 53 

, 3 

, 16 

,242 238 


2640 

DATA 

53, 3 

, 173 

, 53 

3 

240 33 

o 

2643 

DATA 

32,244 

, 180 

, 160 

, 0 

177 247 

2650 

DATA 

201, 32 

144 

11 

, 201 

, 96,176 


2655 

DATA 

7,201 

, 64 

,, 144 

6 

, 24,105 

o 

2660 

DATA 

64, 24 

, 105 

, 64 

, 145 

, 51,200 

2665 

DATA 

204, 53 

, 3 

, 208 

228 

160, 0 


2670 

DATA 

173, 53 

, 3 

, 1 45 

, 71 

, 2.00,1 í 5 

0 

2675 

DATA 

51,145 

, 71 

, 200 

, 165 

52., i' 5 

2680 

DATA 

71,173 

, 35 

, 3 

, 240 

, 1.81 52 


2685 

DATA 

253,174 

32 

, 1.39 

, 176 

169 0 


2690 

DATA 

160, 0 

, 145 

, 71 

, 200 

,173, 56 

o 

2695 

DATA 

3,145 

71 

, 104 

170 

,160, 0 


2700 

DATA 

24, 76 

, 24 0 

255 

, 0 


o 

2705 

: 






2710 

REM ***************** * 



2715 

RÉM * 

DÍREKTORY 

DATA 

M- 


o 

2720 

RE M ************* *** * 


2725 

2730 

DATA 

169, 1 

160 

, 0 

, 162 

, 8, 32 


2735 

DATA 

186,255 

160 

, 232 

, 32 

, 189 255 

o 

2740 

DATA 

32,213 

243 

“V ' 

u O 

, 25 

,242, 32 


2745 

DATA 

67,207 

32 

67 

207 

32, 67 


2750 

DATA 

207,164 

198 

, 196 

, 144 

,208, 18 

o 

2755 

DATA 

32,205 

189 

, 230 

, 211 

, 32, 19 


2760 

DATA 

238, 32 

210 

, 255 

, 208 

,248, 32 


2765 

DATA 

215,170 

208 

, 226 

32 

, 6 6,2 16 

o 

2770 

DATA 

76,231 

255 

32 

19 

,238,170 


2775 

DATA 

76, 19 

238 





2780 

: 






o 


2785 

2790 

2795 

2800 

2805 

2810 

2815 

2020 

2825 

2830 

2835 

2840 

2845 

2850 

2855 


RE'M ************ 
RÉM * ÁLLANDÓK * 
REM ******•****** 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


111 
111 

II X 
1 X 1 
1 XX 
i X X 
1 X1 

III 
"1 

" 1 
"0 


111 
1XX 
XI1 
X i v 

i i x 

1 X. 1 
XXI 
111 


11 
XX 
XX 
IX 
X1 
IX 
XI 
11 


xxxx 
1111 
11 X X 
1 X 1 X 
X11X 
1XX1 
X1 X1 
1111 


XXXX 
X X X X 
11 X X 
1 X 1 X 
X 1 1 X 
X11X 
1 X1 X 
1111 


11111111222 


un; 


11111 


'W'J') 

.1 - .»... A- ..... V 


112211221í 221í 21 
1212121212121211 
12211221211221lí 
122121121221211.: 


XXXXXXXX22 
, XXXX2222XX 
XX22XX22XX 
X2X2X2X2X2 
X22XX22X2X 
X22X2XX2X 


1212212121211212,X2X22X2X2X 
,XXXXXXXXXXXXXXXX,2 

n II ^ u 
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SZOFTVER 

többet ésszel! 


XXIV. rész 

A soros állományok között van egy különleges példány, 
amely rajta van minden lemezen, és még nem beszéltünk róla. 
A katalógusról vagy tartalomjegyzékről van szó, amelynek a 
neve , Ezt az állományt a LOAD paranccsal már mindenki 
használta, akár csak egy játék betöltése előtt is. Ha viszont a 
LOAD-dal betölthető, akkor ennek egy szabályos soros, PRG tí¬ 
pusú állománynak kell lennie, amelyet az előző részekben meg¬ 
ismert módon olvashatunk, feldolgozhatunk. 

Ha valaki ezzel megpróbálkozik, csak télig fog neki sikerül¬ 
ni a dolog. Ugyanis a ,,$’ állományból nem azt kapjuk, ami a 
tartalomjegyzékben látható szokott lenni. Ehelyett byte-onként 
megkapjuk a lemez 18—00 számú (BAM) blokkjának a tartal¬ 
mát, majd sorban a katalógus összes felvett blokkjának a tartal¬ 
mát is. Ugyanezt látnánk egy lemezmonitorral is, vagy a kataló¬ 
gusblokkokat közvetlenül kiolvasva. Ezek beosztásáról a XX. 
részben beszéltünk. 

Válasszuk a másodlagos címnek a nullát! Ettől a DOS a tar¬ 
talomjegyzéket már BASIC programsorokká átalakítva adja át, 
ugyanúgy, ahogy a LOAD paranccsal való betöltéskor. A nullás 
másodlagos címnek közönséges soros fde esetében nincs eltérő 
hatása a többi értéktől, de a ,,$’ állományt másképp nyitja meg. 
A névben nem szabad megadni a fiié típusát és megnyitási mód¬ 
ját. Például: OPEN 2,8,0, ”$COM*=S”. 

Az ilyen katalógusállománynak is kötött a szerkezete. Min¬ 
den rekord 32 byte hosszú, külön rekordvégjei nincs. A rekor¬ 
dokban bármilyen karakter előfordulhat, ezért az olvasásuk 
GET-tel ajánlott. Az állomány első rekordja a fejléc, utolsó re¬ 
kordja a szabad blokkok számának kiírása. Köztük annyi bejegy¬ 
zésrekord van, ahány fde megjelenne a tartalomjegyzékben. A 
rekordok tartalmát úgy adom meg, mint máskor, a byte-okat 
hexában indexelem $00 és $1F között. 

A fejléc szerkezete: 

00-07: 01 04 01 01 00 00 12 22. 

08—17: a lemez neve, szóközökkel kipótolva (16 karakter). 
18—19: 22 20. 

1A—1E: a lemez azonosítója és a, ,2A” vagy a helyén levő karak¬ 
terek, összesen öt byte. 

1F: 00 

A bejegyzés szerkezete: 

00 - 01 : 01 01 . 

02—03: a fiié hossza, kétbyte-os (alsó/felső) alakban. 

04—07: 20 20 20 22. 

08—18: a lile neve, utána egy idézőjel, majd szóközök, össze¬ 
sen 17 byte hosszan. 

19: 20. 

1A—IC: a típusjel három karaktere (pl. PRG). 

II)—1F: 20 20 00. 

Figyelem! Ha a fiié hossza decimális alakban írva egynél 
több jegyű, akkor minden újabb számjegy balra tolja a 07—IC 
tartományt, az előtte levő szóközök (20) rovására. Az 1A— IC he¬ 
lyeken így felszabaduló byte-okra szóközök kerülnek. Ettől a 
konverziótól kerülnek a tartalomjegyzékben mindig egymás alá 
a nevek első betűi. 

A lábléc szerkezete: 

00 - 01 : 01 01. 


02—03: a szabad blokkok száma, kétbyte-os (alsó/felső) 
alakban. 

04—0F: a „BLOCKS FREE.” szöveg. 

10 —IC: 13 db szóköz. 

II)—1F: 00 00 00. 

Eddig cak soros állományokról volt szó, de van egy másik 
típus is, amelynek a jele REL. A relatív típus különleges tulaj¬ 
donságai: rekordjai azonos hosszúak, tetszés szerint váltogatva 
lehet olvasni vagy írni, méghozzá bármikor bármelyik rekord¬ 
ját. Ezzel az adatszerkezettel már kielégítően gyors és akár pár¬ 
száz kilobyte-nyi adattömeget is kezelni képes nyilvántartó prog¬ 
ramok is készíthetők, a saját tapasztalataim szerint. A relatív fiié 
szükség esetén sorosként is olvasható, de sorosként írni, vagy 
éppen soros állományt relatívként használni már nem lehet. 

Ennek elsősorban a relatív állományok különleges felépíté¬ 
se az oka, amelyről szintén a XX. részben tettem már említést. 
Egy rekord eléréshez elég tudni a rekord sorszámát az állomá¬ 
nyon belül és a rekordok hosszát, ezek alapján kiszámítható, 
hogy a rekord az állomány hányadik blokkjába esik. Az állo¬ 
mányban a fő láncon kívül van egy kiegészítő adatlánc is, az ol¬ 
dalszektorok. Ezekben van felsorolva, hogy az állomány hánya¬ 
dik blokkja a lemez pontosan melyik szektorában van, azaz meg¬ 
tudható a rekord pontos helye. Nekünk persze nem kell ilyesmi¬ 
vel bíbelődnünk, csak a rekord sorszámát közölnünk, a többi a 
DOS dolga. Egyébként a relatív állomány, éppen azért, mert a 
lemez meghatározott szektorait foglalja el, közönséges file¬ 
másoló programmal nem másolható. 

A relatív fiié, eltérően a többitől, kétféleképpen nyitható 
meg. Az egyik eset, amikor az állományt újonnan hozzuk létre 
a lemezen. Ekkor kell a DOS-szal közölnünk a rekordok hosszát, 
amely alapján később a rekordok helye kiszámítható lesz. A re¬ 
kordhossz később már nem változtatható meg, ezért figyelmet 
kell szánni az adatbázis megtervezésére. Ehhez van három meg¬ 
jegyzésem. A rekordok azonos hosszúak, ezért nem szükséges 
a végüket külön karakterrel jelölni, megtakaríthatunk egy-egy 
byte-ot. Rendszerint a mezők is azonos hosszúak, ezért terminá- 
torok sem szükségesek, a mezők enélkül is szétválaszthatok. És 
végül: néha érdemes lehet mégis egy byteot hagyni egy rekord¬ 
végjeinek (leginkább egy Returnnek), mivel ha úgy alakul, hogy 
egy rekord végén csak nullás karakterek állnak, akkor azok se¬ 
hogy sem lesznek hibátlanul beolvashatók. A rekord végére tett 
Return segít ezt megelőzni. 

Szóval, ha sikerült eldöntenünk, hogy egy rekord mindenes¬ 
tül hány byte hosszú, akkor létre kell hozni egy ilyen állományt 
az 1. példán látható módon. Az RH változóban a rekord teljes 
hossza van, ez 1 és 254 közötti értéket vehet fel. Ezzel csak az 
állomány bejegyzését készítettük el, maga az állomány ilyenkor 
még egy rekordot sem tartalmaz. A lezárás a megnyitás után kö¬ 
telező. 

A megnyitás második módja a már létrehozott állományon 
működik, a 2. példa első sora szerint. Megengedett dolog, de 
nem szokás a ,,NEV,R” paraméter használata is, amellyel jelez¬ 
zük a REL típust; a típust elhagyva szintén relatív állományra 
utalunk. A megnyitott állomány ezután bármikor írható vagy ol¬ 
vasható. Mivel az állomány még üres, elsősorban írnunk kell 
bele. 

Közvetlenül megadható, hogy akár az írás, akár az olvasás 
hányadik rekord (P változó) melyik karakterétől (K) kezdődjön. 
Erre szolgál egy eddig még nem említett DOS-parancs, a ,,P”, 


o 
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amelyhez persze kötelező a parancs-csatorna megnyitása. Ren¬ 
des esetben ezt is és a relatív állományt is egyszer nyitjuk meg 
a program elején, és csak a program végén zárjuk le őket, nem 
pedig minden írás vagy olvasás után. Viszont a 2. példának meg¬ 
van a saját értelme. 

Tegyük fel, hogy írni akarunk a 10. rekordba. Ha az még 
nem létezik, akkor a DOS automatikusan annyi blokkot vesz fel 
az állományba, hogy a kijelölt rekordnak már létrejöjjön a helye. 
Formailag az ilyen állománybővítést a DOS hibaként észleli, és 
az 50-es hibaüzenetet küldi. Ezzel nem nagyon kell törődnünk, 
mert a rekordba írás ettől még hibátlanul megtörténik. Viszont 
minden ilyen esetben, amikor még nem létezik a megcímzett re¬ 
kord, az előkészítése némi időbe telik, újabb hibaüzenetekkel 
jár, és nem is biztos, hogy a lemezen még elég hely van hozzá. 
Mindezekért érdemes egy relatív állományt az azt kezelő prog¬ 
ram indítása előtt vagy elején teljes terjedelemében előkészíteni, 
felvenni. Ehhez csak az szükséges, hogy írjunk valamit a legutol - 
só rekordba. Ha van egy már bejegyzett „NÉV” állományunk, 
amelyben várhatóan 100 rekordot akarunk használni, akkor a 2. 
példa egészében előkészíti azt. Többszáz rekord felvételekor a 
lemezegység akár percekig is dolgozhat. A munka elvégzéséről 
úgy értesülhetünk, hogy a DOS csak azután válaszol a neki feltett 
kérdésre (7. sor). 

A példa 5. sorában látható parancsban egy olyan karakter¬ 
láncot küldök a lemezegység parancs-csatornáján, amellyel elő¬ 
re megjelölöm a következő írás helyét az állományban. Az üze¬ 
net első karaktere a ,,P” (pozíció) parancs. A második karakter 
a relatív fiié megnyitásakor használt másodlagos cím (csatorna) 
száma. A harmadik és negyedik karakterek tartalmazzák a re¬ 
kord számát, első/felső byte sorrendben. Végül az ötödik karak¬ 
ter azt jelzi, hogy a rekord hányadik byte-jánál akarjuk kezdeni 
az írást vagy olvasást. Maga az írás és olvasás a soros állomá¬ 
nyokra is vonatkozó szabályok szerint történhet, mindig az ez 
előtti pozícionáló parancsban meghatározott rekordban. Ha a 
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OPEN 2,8,3,"NÉV,L,"+CHR$(RH> Q 
O CLOSE 2 
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( 2 . ) 

1 OPEN 2,8,3,“NÉV" 

2 OPEN 15,8,15 

3 P=100: K=1 

4 PH=INT(P/256): PL=P-PH*256 

5 PR I NT#15, "P“ ;CHR$(3); 

CHRS(PL)+CHRS(PH)+CHRÍ(K> 

6 PRINT#2,"100.REKORD" 

7 INPUT fi 1 5, E 

8 CLOSE 2: CLOSE 15 


(3. ) 

40 INPUT #2,R$ 

41 NE$(X>=MID$(R$, 1,20) 

42 EV$(X)=MIDS(RS,21,4) 

43 F2(X)=VAL(MIDS(RS,25,6)) 
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C-64 C+4 AMIGA PC 


tulajdonosok! 

Várunk benneteket az Országos Commodore 
Egyesület klubdélelőttjén a Havanna Közösségi 
Házban minden hónap 3. vasárnapján, délelőtt 
9 órától. Gépet és hosszabítót hozzatok! 

Cím: 1181 Budapest, Kondor Béla sétány 8. 
Megközelíthető: a metró kőbánya-kispesti végál¬ 
lomásától a piros 136-os busszal. 

Legközelebb: 

július 17-én és 
augusztus 21-én. 


pozicionálást elhagyjuk, akkor az utoljára használt rekord utáni 
következik, most megnyitott állományban az első rekord. A so¬ 
ros állományoktól eltérően az ST változó 6. bitje minden rekord 
végén magasra áll (ld. előző rész). 

A relatív állományok használata közben észrevehettem két 
hibalehetőséget. Az egyik: megengedett ugyan, hogy ne a rekord 
elején kezdjük az írást, de mindenképpen a rekord végéig kell 
tartania. Ha ugyanis a beírt karakterlánc rövidebb, a maradék 
byte-okat a DOS nullás karakterekkel tölti fel, törölve a rekord 
további tartalmát. Függetlenül attól, hogy a kiírás végén írtunk-e 
Returnt vagy sem. A hibát megelőzni csak a teljes rekord írásával 
tudom. 

A másik hibajelenséget csak nagy adatbázis kezelésekor, 
egymástól távoli rekordok olvasásakor vagy írásakor tapasztal¬ 
tam. A lemezegység sokszor egy egészen más rekordot olvasott 
el, vagy ami sokkal rosszabb, más rekordba írt, mint amelyiket 
a ,,P” paranccsal megjelöltem. Ennek már régen felfedeztem az 
ellenszerét: ugyanazt a ,,P” parancsot közvetlenül egymás után 
kétszer kell kiadni. Az ez által okozott késés elhanyagolható, és 
azóta egy hiba sem fordult elő. 

A relatív állományok kezelésének számos fortélya van. Pél¬ 
dául egy osztály bármelyik tanulójának nevét megkapva tudni 
kell, hogy a tanuló további adatai hányás számú rekordban van¬ 
nak; anélkül, hogy a rekordokat végigolvasnánk. Ehhez egy so¬ 
ros kulcs- vagy indexállomány használható, amelyet a gyors ke¬ 
resés érdekében már a program elején a memóriába lehet tölteni, 
és amelyben valamilyen módon a névhez van rendelve a rekord 
sorszáma, esetleg még néhány rövid, de gyakran használt adat. 

Korábban említettem, hogy a mezők terminátorok nélkül is 
elkülöníthetők. Ehhez az szükséges, hogy a mezők hossza és 
kezdőpozíciója a rekordon belül egységes legyen. A 3. példán 
egy primitív megoldása látható egy általános módszernek, egy 
program részleteként. A módszer arra való, hogy a mezőket 
önállóan kezelhetővé tegyük, például tömbváltozókban. A re¬ 
kordban a név 20, a születési év 4, a fizetés 6 karakteren van tá¬ 
rolva, plusz a Return, tehát a rekordhossz összesen 31 byte. írás 
előtt a rekordokat hasonló módszerrel, karakteres függvények 
segítségével lehet összeszerkeszteni. 

Kissé eltértem a témától, mert ez már programozástechni¬ 
ka, de a továbbiakban ilyesmiről lesz szó. Ezzel a résszel, azt 
hiszem, mindent elmondtam a perifériák kezeléséről, amit rövi¬ 
den el lehet mondani. A következő részben egy olyan program 
bemutatásába és elemzésébe kezdek, amelynek leírása a 94/1. 
szám 23. oldalán olvasható. 


















PROGRAM 


& 

Egyenletek megoldása 


Lineáris inhomogén 
határozatlan egyenletek 
megoldása C-64-esen 

Az ilyen típusú egyenletek általános 
alakja: 

A*X + B*Y = C 

ahol A, B és C egész számok, X és Y is¬ 
meretlenek, értékük szintén egész szám 
vagy nulla. 

Az egyenletek vagy megoldhatók, 
azaz végtelen sok számpár kielégíti 
azokat, vagy megoldhatatlanok, azaz 
nincs olyan számpár, amely kielégítené 
őket. 

Ha A és B együtthatók legnagyobb 
közös osztójával osztható a C állandó tag, 
akkor az egyenlet megoldható; ellenkező 
esetben nincs olyan egész számpár, amely 
az egyenletet kielégítené. Ha az egyenlet 
együtthatóit a legnagyobb közös osztójuk¬ 
kal elosztjuk, olyan egyenlethez jutunk, 
mely együtthatói relatív prímszámok. 
Ilyen egyenlet megoldáshalmaza termé¬ 
szetesen azonos az eredeti egyenlet meg¬ 
oldáshalmazával. A program a 2. és 4. 
részben ezt az alakot írja ki. 

Fentiekből következik: ha az együtt¬ 
hatók relatív prímszámok, az egyenlet 
mindig megoldható. 

Ha C = 0, akkor az inhomogén 
egyenletnek megfelelő homogén egyen¬ 
letről beszélünk. A homogén egyenletek 
is mindig megoldhatók. 

Az inhomogén egyenlet egy partiku¬ 
láris megoldása az az XP, YP számpár, 
amely az egyenletet kielégíti. Ilyen szám¬ 
pár felkutatása a megoldhatóság szem¬ 
pontjából azért fontos, mert az inhomo¬ 
gén egyenlet általános megoldását úgy 
kapjuk meg, hogy annak egy partikuláris 
megoldását és a megfelelő homogén 
egyenlet általános megoldását összead¬ 
juk. 

A vizsgált egyenlet egy partikuláris 
megoldását úgy kapjuk meg, hogy meg¬ 
keressük az A *X + B*Y = 1 egyenlet egy 
(u, v) megoldását (ahol A és B már relatív 
prímszámok), majd ezt C-vel végigszo¬ 
rozva kapjuk a vizsgált egyenlet egy parti¬ 
kuláris megoldását. 

A leírtaknak megfelelően a program 
négy részből áll. 

Az első részben kiírja az általános 
alakot, majd bekéri az együtthatókat. Ezt 
követően kiírja a vizsgált egyenletet az ál¬ 
talunk megadott együtthatókkal. 


n 


10 PRINTCHRSC147):PRINT 

20 PRINTTABC5)”A PROGRAM MEGKERESI A LINEÁRIS” 

30 PRINTTAB(2)”INH0M0GEN HATAROZATLAN (DIOFANTOSZI)” 

40 PRINTTAB(7)”EGYENLET ÖSSZES MEGOLDÁSÁT”:PRINT:PRINT 
50 PRINTTAB(2)”A PROGRAM 4 RÉSZBŐL ALL:PRINT 
60 PRINTTAB(2)”1./ AZ INHOMOGÉN EGYENLET ME&0LDHA-” 

70 PRINTTAB(6 V’TOSAGANAK VIZSGÁLATA”: PRINT 
80 PRINTTAB(2)”2./ A HOMOGÉN EGYENLET ÖSSZES” 

90 PRINTTABÍ6)"MEGOLDÁSA”:PRINT 

100 PRINTTAB(2)”3./ AZ INHOMOGÉN EGYENLET EGY” 

110 PRINTTABC6)"PARTIKULÁRIS MEGOLDÁSA”:PRINT 
120 PRINTTAB(2)”4./ AZ INHOMOGÉN EGYENLET ÖSSZES” 

130 PRINTTAB(6 V’MEGOLDASA”: PRINT 
140 PRINT” BILLENTYŰVEL TOVÁBB!” 

150 GET AS:IF A$=”” THEN 150 

190 PRINTCHR$(147):PRINT:PRINT 

195 PRINTTAB(8)” KÉSZÍTETTE HEGYI FLÓRIAN”:PRINT 

200 PRINTTAB(13)” BUDAPEST,1993.”:PRINT:PRINT:PRINT:PRINT 

201 PRINT” BILLENTYŰVEL TOVÁBB!” 

202 GET AS: IF AS=”” THEN 202 

205 CLR 

206 RÉM 

207 RÉM 

210 PRINT:PRINTTABC4>”1. / AZ INHOMOGÉN EGYENLET MEG-” 

220 PRINTTABIS)”0LDHAT0SAGANAK VIZSGÁLATA”:PRINT:PRINT 
230 PRINT” BILLENTYŰVEL TOVÁBB!” 

240 GET AS:IF AS=”” THEN 240 

250 F'RINTCHRS(147)'.PRINT 

260 PRINTTABU1 >”A2 ÁLTALÁNOS ALAK”:PRINT 

270 PR1NTTABU2 )”A«X tB* Y=C”: PRINT 

280 INPUT” X EGGYUTTHATOJA:”iA 

290 INPUT” Y EGGYUTTHATOJA:”;B 

300 INPUT” AZ ALLANDO TAG:”;C 

310 PRINT 

320 IF A=INT(A) THEN IF B=INT(B) THEN IF OINT(C) THEN 340 
330 PRINT” EGESZ SZAMOT KEREK!”:GOTO 280 

340 IF A=0 OR B=0 THEN PRINT” ÉRTELMETLEN,UJ ADATOT KEREK!”:GOTO 
350 PRINTTAB(10)”A VIZSGÁLT EGYENLET:”:PRINT 
360 PRINTTAB(IO) A; ”U«X + (”;B;”||)*Y=”SC 
365 PRINT 

370 KI =A: K2=B 

371 IF K1<0 THEN K1=-K1 

372 IF K2<0 THEN K2=-K2 

380 IF KI<K2 THEN S=K1:K1-K2:K2=S 
390 IF K1/K2=INT(K1/K2) THEN 2000 
400 PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

410 GET AS:IF Aí=”” THEN 410 
420 PR 1 NTCH.RS (14 7): PR I NT 

430 PRINTTAB(4)”Q ÉRTÉKÉI”SPC(3)”R ÉRTÉKÉI”SPC(3)”L ÉRTÉKÉI” 

440 PR1NTTABU)”****»***»*‘*****«****************”:PRINT 
450 Q-INT(KI/K2) 

460 L=L+1 
470 R=K1-Q«K2 

480 printtab(7);q;tab<20);R;tab(32);l 
490 KI=K2:K2 =R 

500 IF K1/K2-INTCK1/K2) THEN PRINT” 

A LEGNAGUOBB KÖZÖS OSZTO:R:D=R:GOTO 540 
510 GOTO 450 

530 PRINT:PRINT”AZ EGYENLETNEK NINCS EGESZ MEGOLDÁSA!”:GOTO 5100 
540 IF C/D=INT(C/D) THEN 560 
550 GOTO 530 

560 PRINT” AZ EGYENLETNEK VAN EGESZ MEGOLDÁSA!” 

570 PRINT:PRINT”TOVABB? I/N” 

580 GET A$:IF AS=”” THEN 580 

590 IF A$=”N” GOTO 5100 

600 PRINTCHRSC147):PRINT:PRINT:PRINT:PRINT 
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605 RÉM 

606 RÉM 

610 PR1NTTAB(4)”2./ A HOMOGÉN EGYENLET ÖSSZES” 

620 PRINTTAB(14)"MEGOLDÁSA”:PRI NT: PRI NT 
630 A=A/D:B=B/D 

640 PRINTTABC10)”A VIZSGÁLT EGYENLET:”:PRINT 
650 PRI NTTAB (8 )Aí ”|»*X0 + (”; B; ”U>*Y0=”;0 
660 PRINT:PRINT” AZ ÖSSZES MEGOLDÁS”:PRINT 

670 PRINTTABC5)” X0*”1-B;”B»N”’.Y0=”;A;”B«N” 

680 PRINT:PRINT” AHOL N TETSZÉS SZERINTI EGESZ SZÁM” 

682 PRINT:PRINT” 

KIÍRJUK A HOMOGÉN EGYENLET MEGOLDÁSAIT? I/N”:PRINT 

684 GET A$:IF A$=”” THEN 684 

685 IF A$=”N” THEN 840 

690 INPUT” AZ EGESZ SZÁM ALSÓ HATARA N1=”;N1 
700 INPUT” AZ EGESZ SZÁM FELSŐ HATARA N2=”;N2 
710 PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

720 GET A$: IF A$ = ”” THEN 720 
730 PRINTCHRíC147):PRINT 

740 PRINTTAB(5)”N”;TAB(10)”X0 ÉRTÉKÉI”SPC(2)”Y0 ÉRTÉKÉI” 

750 PRINTTABC5)”*********************«*«*»*” 

760 PRINT 

770 FÓR N=N1 TO N2 
780 X0=-B*N:Y0=A*N 

790 PRINTTAB(5);N>TAB(15)>XO>TAB(25)> YO 
800 NEXT N 

810 PRINT:PRINT” ÚJABB N ÉRTÉK? I/N” 

820 GET A$:IF A$=”” THEN 820 
830 IF A$=”I” THEN 690 
840 PRINTCHR$(147):PRINT 
850 PRINT:PRINT:PRINT:PRINT 

855 RÉM 

856 RÉM 

860 PRINTTAB(5)”3./ AZ INHOMOGÉN EGYENLET EGY” 

870 PRINTTAB(9)”PARTIKULARIS MEGOLDÁSA”:PRINT:PRINT 
875 DIM Q(L),R(L),A(L),B(L) 

880 PRINTTABi10)”A VIZSGÁLT EGYENLET”:PRINT 

890 PRINTTABC8 ) A; ”B«X +(”> Bj ”||>*Y=”> 1 

891 IF L=0 THEN 3000 

892 IF L=1 THEN 3900 

900 PRINT:PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

910 GET A$:IF AS=”” THEN 910 
915 PRINTCHRS(14 7 ):PRI NT 

920 L1=A:L2=B 

921 IF L1<0 THEN L1--L1 

922 IF L2<0 THEN L2=-L2 

923 IF L1<L2 THEN T=L1 :L1 =L2: L2=T 
960 FÓR 1=1 TO L 
970 Q(I ) = INT(L1/L2) 

980 R(I)=L1-QCI)*L2 

1000 L1=L2:L2=R(I) 

1010 NEXT I 

1045 PR1NTTABC5)”I”TAB(10)”A(I)”SPC(10)”B(I)” 

1050 PR1NTTAB(5)”***»*******************”:PRINT 
1060 A(1)=1:B(1) = -Q(l ) 

1070 A(2)=A(1)*(-Q(2)):B(2)=B(1)*(-Q(2)Xl 
1080 PRINTTAB(5)d;TAB(10);A(l);TAB(24);B(1) 

1090 PRINTTAB(5);2',TAB(10);A(2);TAB(24);B(2) 

1100 IF L=2 THEN 4000 
1110 FÓR 1=3 TO L 
1120 A(I)=A(I-1)*(-Q(I))+A(I-2) 

1130 B(I)=B(I-1)»(-Q( I) )+B(1-2) 

1140 PRINTTABC5)>I>TAB(10);A(I)>TAB(24);B(I) 

1150 NEXT I 

1152 IF A>0AND B>0 THEN XP=A(L):YP=B(L):IF ABS(AXABS(B)THEN XP=B(L):YP=A(L) 
1154 IF A>0AND B<0 THENXP=A(L):YP=-B(L):IFABS(AXABSÍB)THENXP=B(L):YP=-A(L) 
1156 IF A<0AND B>OTHENXP=-A(L):YP=B(L):IFABS(AXABS(B)THENXP=-B(L):YP=A(L) 
1158 IF A<OANDB<OTHENXP = -A(L):YP = -B(L):IFABS(AXABS(B)THENXP = -B(L): YP = -A(L) 
1180 GOSUB 5200 

1185 RÉM 

1186 RÉM 
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A továbbiakban megkeresi az együtt¬ 
hatók legnagyobb közös osztóját, majd 
megvizsgálja, hogy ez a szám osztja-e a 
C állandót. Ha a C szám osztható a legna¬ 
gyobb közös osztóval, a program kiírja 
annak értékét, majd közli, hogy az egyen¬ 
letnek vannak egészszámú megoldásai. 
Ezt követően a program megkérdezi, 
hogy tovább kívánunk-e menni. Az I bil¬ 
lentyű lenyomásával a program tovább 
megy, ha csak az egyenlet megoldhatósá¬ 
gát vizsgáljuk, akkor az N billentyű befe¬ 
jezi a programot. 

A második részben a program kiírja 
a homogén egyenletet relatív prímszám 
együtthatókkal, annak általános megoldá¬ 
sát, végül megkérdezi, hogy kívánjuk-e 
kiíratni a megoldásokat. Erre ugyanis 
csak a program további feldolgozása során 
van szükség. Ha igennel válaszolunk, be¬ 
kéri a kiírandó intervallum alsó és felső 
határát, majd egy billentyű megnyomásá¬ 
val képernyőt töröl és a megoldásokat táb¬ 
lázatosán kiírja. A program lehetőséget 
ad arra, hogy más intervallumhatárokkal 
további megoldáshalmazt írjon ki. Ha 
nem kívánunk további intervallumot meg¬ 
adni, az N billentyű lenyomásával a prog¬ 
ram tovább lép. 

A harmadik részben a program kiírja 
az 

A*X + B*Y = 1 

egyenletet , ahol A és B itt is relatív prím¬ 
számok, és az egyenlet egy partikuláris 
megoldását. Billentyű megnyomása után 
a képernyő törlődik, majd a negyedik 
részre tér át a program. 

A negyedik részben a program kiírja 
a vizsgált egyenletet relatív prímszám 
együtthatókkal, ennek általános megoldá¬ 
sát, majd megkérdezi, hogy az egész szá¬ 
mok halmazán, vagy a természetes szá¬ 
mok halmazán kívánjuk-e a megoldáso¬ 
kat. Az E billentyű megnyomásával az 
egészszám megoldásokat írja ki úgy, hogy 
azt a második részben lehetővé tette. 

A T billentyű leütésével a természe¬ 
tes szám-megoldások mellett döntöttünk. 
A program elágazik, majd kiír egy java¬ 
solt intervallum-határt -100-tól 100-ig. 
Természetesen ettől el lehet térni. Túl 
nagy intervallum megadása azonban nem 
célszerű, mert több időt vesz igénybe. A 
továbbiakban megkéri a vizsgálni kívánt 
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2110 
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PRINTCHR$(147): PRINT:PRINT:PRINT O 

PR1NTTAB(5)”4. / AZ INHOMOGÉN EGYENLET ÖSSZES” 

PRINTTAB(15)"MEGOLDÁSA”:PRINT:PRINT 
PRINTTABI10)”A VIZSGÁLT EGYENLET”:PRINT 

printtab<io)a;”u*x+(”;b;”II)»y=”;c/d 

PRINT:PRINT”AZ ÖSSZES MEGOLDÁS”:PRINT q 

PRINT” X=”;C/D;”l»» (”;XP; ”UX<”; -B;”H)*N” 

print” y=”;c/d;”H‘(”;yp;”B)+(”;A5”B)*n” 

PRINT:PRINT” AHOL N TETSZÉS SZERINTI EGESZ SZÁM”:PRINT O 
PRINT:PRINT” AZ EGESZ SZAMOK HALMAZAN (E)” 

PRINT” A TERMÉSZETES SZAMOK HALMAZAN (T)” q 

PRINT” KÉRI A MEGOLDÁSOKAT?”:PRINT 
GET Aifc: IF A$ = ”” THEN 1315 

IF A$=”T” THEN 4100 O 

PR1NTGHRSÍ147) 

INPUT” AZ EGESZ SZÁM ALSÓ HATARA NI=”;NI n 

INPUT” AZ EGESZ SZÁM FELSŐ HATARA N2=”;N2 U 

PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

GET AS:IF AS=”” THEN 1350 O 

PRINTCHR$(147):PRINT 

PRINTTAB(5)”N”TAB(10)”X ÉRTÉKÉI”SPC(2)”Y ÉRTÉKÉI” 
PRINTTAB(5 )”***»***»*«*«**«»«***»*********”: PRIN.T 
FÓR I-NI TO N2 
X=C/D*XP-B*I 
Y=C/D*YP+A*I 

PR1NTTAB(5)>IJTABC12)>X >TAB(25)> Y 
NEXT I 

PRINT:PRINT” ÚJABB N ÉRTÉK? I/N” 

GET A$:1F A$=”” THEN 1570 
IF A$=”I” THEN 1320 
GOTO 5100 
RÉM 
RÉM 

L=0:D=K2 

PRINT” A LEGNAGYOBBKOZOS OSZTO:”;D 
IF C/D=INT(C/D) THEN 2040 

PRINT” AZ EGYENLETNEK NINCS EGESZ MEGOLDÁSA!”:GOTO 5100 
PRINT” AZ EGYENLETNEK VAN EGESZ MEGOLDÁSA!” 

PRINT” BILLENTYŰVEL TOVÁBB!” 

GET AS:IF AS=”” THEN2042 
GOTO 600 
RÉM 
RÉM 

IF A>0 AND B>0 THEN XP=1:YP*1-A*XP 
IF A>0AND B<0THEN XP-1:YP=-1+A*XP 
IF A<0AND B>0THEN XP=-1:YP=1-A*XP 


O 

o 
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intervallum alsó és felső határát, képer¬ 
nyőt töröl, majd a bal felső sarokba kiírja 
a 'türelmet, számolok’ figyelmeztetést je¬ 
lezve, hogy a gép nem merevedett le. Pár 
másodperc múlva a gép kiírja a pozitív 
megoldásokat, vagy ha ilyent nem talál, 
akkor ezt közli. Végül megkérdezi, hogy 
új intervallum-határokat kívánunk-e meg¬ 
adni. Ha igen, a program ezt lehetővé te¬ 
szi, ha nem, akkor megkérdezi, hogy az 
egész számok körében kívánunk-e vizsgá¬ 
latot végezni. Igen’ válasz esetén erre le¬ 
hetőség van, ’nem’ válasz esetén az ’újabb 
számítás?’ kérdés jelenik meg. Ha ismét 
a ’nem’ választ adjuk, a program befe¬ 
jeződik. 

Alapvető tény, hogy az ilyen típusú 
egyenleteknek a természetes számok hal¬ 
mazán vagy nincs megoldásuk, vagy vé¬ 
ges számú, esetleg végtelen sok megol¬ 
dással rendelkeznek. így előfordulhat, 
hogy a program ezen ága nem ad megol¬ 
dáshalmazt. Ilyenkor az egész számok kö¬ 
rében javasolt a vizsgálat elvégzése. Itt az 
X és Y értékek növekvő vagy csökkenő 
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IF AcOAND B<0THEN XP=-1:YP=-1+A*XP 

GOSUB 5200 O 

GOTO 1210 

IF A>0AND B>0 THEN XP=T: YP = -Q: IF ABSCAXABS(B) THEN XP=-Q:YP = 1 

IF A>0AND B<0 THEN XP=1:YP=Q:IF ABS(AXABS(B) THEN XP=-Q:YP—1 U 

IF A<0AND B>0 THEN XP=-1:YP=-Q: IF ABS(AXABStB) THEN XP=Q:YP=1 

IF A<0AND B<0 THEN XP = -1: YP=Q: IF ABS(AXABSCB) THEN XP=Q:YP = -1 O 

GOSUB 5200 
GOTO 1210 

IF A>0AND B>0 THEN XP=A(2):YP-B(2):IF ABS(A)<ABS(B)THEN XP=B<2): YP=A(2) ° 

IF A>0ANDB<0 THEN XP=A(2):YP=-B(2):IF ABS(A)<ABS(B)THEN XP=B<2):YP=-A(2) 

IF A<0ANDB>0 THEN XP=-A(2 ): YP=B(2 ): IF ABS(AXABS(B)THEN XP=-B(2):YP=A(2) q 

IF A<0ANDB<0 THEN XP=-A(2):YP=-B(2):IF ABS(AXABS(B)THEN XP=-B(2):YP=-A(2) 

GOSUB 5200 

GOTO 1210 O 

PRINTCHRM147):PRINT 
PRINT” JAVASOLT KEZDŐ INTERVALLUM” 

PRINT” HATAR:-100-TOL 100-IG.”:PRINT 
INPUT” AZ INTERVALLUM ALSÓ HATARA NI=”;NI 
INPUT” AZ INTERVALLUM FELSŐ HATARA N2=”;N2 
PRINT:PRINT:PRINT 
PRINT” BILLENTYŰVEL TOVAB!” 

GET AS:1F AS=”” THEN 4170 
PRINTCHRSt147):PRINT 

PRINTCHRÍ(19)"TÜRELMET, SZÁMOLOK”:PRI NT 
PRINTTAB(6)”N”TAB(10)”X ÉRTÉKÉI”SPC(2)”Y ÉRTÉKÉI” 


O 
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4200 PRINTTABC5)"»*«*#»**«*«**»***»*««********»”:PRINT 
4210 SV=0 

4220 FÓR N=N1 T0 N2 
4230 X=C/D*XP-B*N 
4240 Y=C/D*YP+A*N 

4260 IFX> =0ANDY>=0THENPRINTTABí 5)N;TAB<12)X;TAB(25)Y:SV=1 
4270 NEXT N 

4280 IF SV=0THENPR1NT” 

A VIZSGÁLT INTERVALLUMBAN NINCS ILYEN MEGOLDÁS” 
4290 PRINT:PRINT” ÚJABB N ÉRTÉK? I/N” 

4300 GET A$:IF AS=”” THEN 4300 
4310 IF Af>-”I ” THEN 4100 

4320 PRINT”KIVANJA VIZSGÁLNI AZ EGESZ SZAMOK KORÉT? I/N” 

4330 GET A$: IF A$=”” THEN 4330 

4340 IF A$=”I” THEN 1311 

5100 PRINT:PRINT” ÚJABB SZÁMÍTÁS? l/N” 

5110 GET Al:IF Aí=”” THEN 5110 

5120 IF A$-”I” THEN PRINT:PRINT:PRINTCHRM147):GOTO 205 
5130 END 
5200 PRINT 

5210 PRINT” A VIZSGÁLT EGYENLET EGY PARTIKULÁRIS” 

5220 PRINT” MEGOLDÁSA:”:PRINT 
5230 PRINT,”XP=”;XP,”YP=”;YP 
5240 PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

5250 GET AS:IF AS=”” THEN 5250 
5260 RETURN 
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tendenciájából következtethetünk arra az 
intervallumra, amelyben a megoldást ke¬ 
ressük, de itt az is kiderülhet, hogy az 
egyenletnek nincs is pozitív megoldása. A 
program futása közben az 1. és a 3. rész¬ 
ben a képernyő felső részén egy-egy táblá¬ 
zat jelenik meg, amelyeknek adatai az al¬ 
goritmus részeredményeit tartalmazzák. 
Ezek az adatok a további feldolgozás 
szempontjából nélkülözhetetlenek, de a 
felhasználó számára közömbösek. Ha a 
programot oktatási célokra használják, e 
táblázatok kiírása célszerű. 

A program minden olyan esetben 
használható, melyben a feladat megoldá¬ 
sát egy kétismeretlenes lineáris inhomo¬ 
gén határozatlan egyenlet megoldáshal¬ 
mazából kell kiválasztani. Az egyenlet 
felállítása, továbbá a megoldáshalmaz 
megfelelő értékpárjainak kiválasztása a 
felhasználó feladata. 


Valós együtthatós 
harmadfokú egyenletek 
összes megoldásának 
megkeresése C-64-esen 

A harmadfokú egyenlet általános 
alakja: 

A3*X13 + A2*X12 + A1*X + A0 = 0 
Ahol A3...A0 együtthatók, 

A3 < >0, 

a többi együttható bármilyen va¬ 
lós értéket felvehet. 

A program a megoldásban a CAR- 
DANO képletet és a HORNER elrendezés 
algoritmusát használja. 

Mint ismeretes egy harmadfokú 
egyenletnek általában három megoldása 
van, azaz vagy egy valós és két (konjugált) 
komplex, vagy három valós gyökkel ren¬ 
delkeznek. 

Ha a harmadfokú egyenletnek egy 
valós gyöke van, ezt a CARDANO formu¬ 
la megadja. A további két komplex megol¬ 
dást úgy kapjuk meg, hogy a harmadfokú 
egyenletet elosztjuk az (X—XI) gyökté¬ 
nyezővel, majd az így kapott másodfokú 
egyenlet komplex gyökeit megkeressük. 
Ez utóbbi műveletet a HORNER elrende¬ 
zés algoritmusa végzi el a programban. 

A program, behívása és elindítása 
után bekéri az együtthatókat, majd kiírja 
az eredményeket. Futtatás közben több 
részeredmény is megjelenik a képernyőn. 
Ez főleg gép nélküli számolás esetén hasz¬ 
nos: a megoldott feladat gépi ellenőrzés 
során megállapítható, hogy a ’kézi’ szá¬ 
molás mely szakaszában lépett fél a hiba. 
Ugyanakkor e részeredmények kiírása a 
felhasználót nem zavarják. 
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10 RÉM 
20 RÉM 

30 RÉM **«•♦»«*«*•♦*«♦******•**••«**».!. 

40 RÉM » HARMADFOKÚ EGYENLET * 

50 RÉM *ÖSSZES GYÖKEINEK MEGHATAROZASA* 

60 RÉM ******************************** 

70 RÉM 

80 PRINT CHR$(147) 

90 PRINT” M»»»»»llMliMMH ARMADFOKU EGYENLET” 

100 PRINT 

110 PRINT’UMIIOSSZES GYÖKEINEK MEGHATAROZASA” 

120 PRINT’ KfflffligilK ER ISMERTETÉST? I/N” 

130 GET A$: IF A$=”” THEN 130 

131 IF Al=”I” THEN GOSUB 10000 

132 CLR 

135 PRINT CHR1(147):FRINT:PRINT 

140 INPUT” A HARMADFOKÚ TAG EGYÜTTHATÓJA:”1A3 

150 PRINT 

160 INPUT” A MÁSODFOKÚ TAG EGYÜTTHATÓJA:”;A2 
170 PRINT 

180 INPUT” AZ ELSŐFOKÚ TAG EGYÜTTHATÓJA: ”;Ai 
190 PRINT 

200 INPUT” AZ ALLANDü TAG:”;A0 

201 PRINT 

205 IF A3=0 THEN PRINT” NEM HARMADFOKÚ EGYENLET”:GOTO 6000 

206 IF A2=0 AND Al=0 AND A0=0 THEN PRINT” 

AZ EREDMENY J X=0 U:G0T0 6000 

207 IF A2-0 AND AO-O THEN 5155 
210 B=A2/A3 : C=A1/A3 : D=A0/A3 
220 P=C-B*B/3 

230 Q=D-B*B*B/27-B*(C-B*B/3)/3 
240 DK=(Q/2)t2 + (P/3)t3 
250 IF DK<0 GOTO 470 

255 PRINT” AZ EGYENLETNEK EGY VALÓS GYÖKE VAN” 

260 IF P=0 GOTO 450 
270 G1 = (-Q/2 +DKT(1/2)) 

280 IF G1<0 THEN G1=-Gl:U1=Giftl/3):U1«-Ul:GOTO 300 
290 Ul*GlT(l/3) 

300 G2 = ( -Q/2-DKT(l/2 )) 

310 IF G2<0 THEN G2=-G2:U2=G2T(1/3):U2—U2: GOTO 330 
320 U2=G2T(l/3) 

330 VI—P/(3«U1) : V2—P/(3*U2) 

340 Z1-U1+V1 : Z2=U2+V2 
345 XI-Z1-B/3:X2=Z2-B/3 
350 PRINT 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 















Cf 

A program magyarázata 


10-30 

132 

135-201 

205-207 

219 

220-230 


240 

250 


255 


260 

270-442 


447 

450-465 


470-530 


540 

550-560 


1000-1010 

2000-2040 

5000-5150 


A program címe, kérdezés az ismertetésre. 

A változók törlése. 

Az együtthatók bekérése. 

Az együtthatók vizsgálata. 

B, C, D a normalizált együtthatók. 

A normalizált együtthatókból alkotott változók. 
(Ezek a harmadfokú egyenlet teljes köbbé való 
átalakításából adódnak.) 

A CARDANO képlet diszkriminánsa. 

Elágazás negatív diszkrimináns esetén a 470. 
programsorra. 

Pozitív diszkrimináns esetén a program jelzi, 
hogy az egyenletnek egy valós gyöke van. 
Elágazás P = 0 esetén a 450. programsorra. 

Az egyenlet egyetlen valós gyökének kiszámítá¬ 
sa, (Gl, G2, Ul, U2, VI, V2, Zl, Z2) a CARDA¬ 
NO képletből adódó változók. 

A program befejezése, lehetőség újabb szá¬ 
mításra. 

A megoldások kiírása DK>0 és P = 0 esetén. 
Ekkor az egyenletnek három azonos valós gyöke 
van, komplex megoldások nincsenek. 

A program jelzi, hogy az egyenletnek három va¬ 
lós gyöke van. Ebben az esetben komplex szám¬ 
ból kell köbgyököt vonni. 

X — a komplex szám valós része, 

Y — a komplex szám képzetes része, 

U13 — a komplex szám kanonikus alakja, mely¬ 
ből köbgyököt kell vonni, 

R — a komplex szám abszolút értéke, 

F — a komplex szám argumentuma, ra- 
diánban, 

FO — a komplex szám argumentuma, fokban, 
A — a módosított argumentum, fokban, 

K — a szögnegyed sorszáma (értéke 1, 2, 3, 
vagy 4). 

Elágazás F0 > =0 esetén az 1000. programsorra. 
Ha F0<=0: az argumentum módosítása, a 
komplex szám által elfoglalt szögnegyed megje¬ 
lölése, ugrás a 3000. programsorra a komplex 
szám trigonometrikus alakjának kiírására, majd 
elágazás a 2000. programsorra az eredmények 
kiszámítására. 

Ugyanaz, mint az 550—560 sorok F0>=0 
esetén. 

Az eredmények kiszámítása az 5000. programso¬ 
ron kezdődő alprogrammal. 

Köbgyökvonás komplex számból. 

E — a módosított argumentum radiánokban, 
L — a többszörös gyököt előállító változó (ér¬ 
téke 0,1 vagy 2) 

W — a trigonometrikus alakú komplex szám 
argumentumai (L értékétől függően há¬ 
rom érték), 

RO — a komplex szám abszolút értékének 
köbgyöke, 

UR — az U komplex szám valós része, 

UK — az U komplex szám képzetes része, 

SÍ, S2 — segédváltozók, 

VR — a V komplex szám valós része, 

VK — a V komplex szám képzetes része, 

Z — segédváltozó, 
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360 PRINT” U1*”;U1,” U2=”;U2 
370 PRINT 

380 PRINT” VI=”;V1>” V2=”;V2 
390 PRINT 

400 PRINT” Zl=”iZl,” Z2=”;Z2 

410 PRINT:PRINT 

420 PRINT” AZ EREDMENY” 

430 PRINT 

440 PRINT”! XI =”;X1,”X2=”',X2”U.:IF P=-B*B/3 

441 PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

THEN PRINT”! X3=”;0”U:GOTO 6000 ' 

442 GET A$:IF A$=”” THEN 442 

443 PRINTCHRSU47) 

444 PRINT:PRINT” KÉRI A KOMPLEX MEGOLDÁSOKAT? I/N” 

445 GET A$:IF A$=”” THEN 445 

446 IF A$=”I” THEN GOSUB 7000 

447 GOTO 6000 

450 PRINT” KOMPLEX GYÖK NINCS” 

451 IF Q<0 THEN Q=-Q:Z=QT(1/3):X=Z-B/3:PRINT” 
X=”;X:G0T0 6000 

460 Z=QT(l/3):X = -Z-B/3;PRINT” X=”;X:GOT06000 
465 GOTO 6000 

470 PRINT” AZ EGYENLETNEK 3 VALÓS GYÖKE VAN”:PRINT 
490 X—Q/2: Y=SQR(ABS(DK)) 

500 PRINT”AZ UT3 KOMPLEX SZÁM KANONIKUS ALAKJA” 

510 PRINT” ”;x;”+I*(”;Y;”)” 

520 R=(X*X+Y*Y)t(l/2) 

530 F=ATN(Y/X): F0=F*180/ti 
540 IF F0>=0 THEN 1000 

550 IF X<0 AND Y>=0 THEN A=F0+180:K=2:G0SUB 
3000:GOTO 2000 

560 A-FO:K=4:GOSUB 3000:GOTO 2000 
1000 IF X<0 AND Y<=0 THEN A=F0+180:K=3:GOSUB 
3000:GOTO 2000 
1010 A=F0:K=1:GOSUB 3000 
2000 L=0:S=1:GOSUB 5000:PRINT 
2010 L=1:S=2:GOSUB 5000:PRINT 
2020 L=2:S=3:GOSUB 5000:PRINT 
2025 PRINT:PRINT”BILLENTYURE TOVÁBB” 

2030 GET AS: IF A$=”” THEN 2030 
2035 PRINTCHRSC147) 

2040 GOTO 6000 

3000 RÉM A TRIGONOMETRIKUS ALAK KIIRASA 
3010 PRINT 

3020 PRINT” lllHA RG-”t A;”FOK”:PRINT 
3030 PRINT”A SZ0GNEGYED:”;K;NEGYED” 

3040 PRINT:PRINT” A TRIGONOMETRIKUS ALAK:”:PRINT 
3050 PRINT R;”*(C0S(”;A;”)+I*SIN<”;A;”))”:PRINT 
3060 PRINT” BILLENTYŰRE TOVÁBB” 

3070 GET A$:1F A$=”” THEN 3070 
3080 PRINTCHRSU47) 

3090 RETURN 

5000 RÉM A GYÖKVONÁS EREDMENYE 
5010 E=A*tr/180 
5020 W=E/3+2.0943951‘L 
5025 RO=RT(l/3) 

5030 UR=R0*C0S(W):UK=R0*SIN(W) 

5040 SÍ=UR/(3*(UR*UR+UK*UK)) 

5050 S2-UK/(3*(UR*UR+UK*UK)) 

5060 VR--P*S1:VK=P*S2 
5070 Z=UR+VR+UK+VK 
5080 X=Z-B/3 

5090 PRINT” UC”»S;”)=”;UR;”+l*(”;UK;”>” 

5100 PRINT” V(”;s;”)=”;VR;”+l*(”;VK;”)” 

5110 PRINT 

5120 PRINT’ Z”;S>”*”;Z 
5130 PRINT 

5140 PRINT”! X”;S;”=”;X”U 
5150 RETURN 
5155 C=A1/A3 
5160 IF 00 THEN 5210 

5170 PRINT” AZ EGYENLETNEK HÁROM” 

5171 PRINT” VALÓS MEGOLDÁSA VAN”:PRINT 
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X — az eredmény, 

S — jelzőszámok (indexek). 

5155—5200 Programrész A2 = 0 és A0 = 0 esetén. Ekkor 
C = A1/A3ésP = C, B = 0, D = 0. Ha >0komp- 
lex gyökök is vannak. 

6000 Kérdés újabb számításra. 

7000 a hányados függvény alprogramja. 

7010—7040 A HORNER elrendezés algoritmusa. 
7050—7060 A másodfokú egyenlet kiírása. 

7100—7160 A komplex gyökök számítása és kiírása. XA és 
XB a konjugált komplex gyökök. 

10000—10130 Az ismertetés alprogramja. 


Futtatási eredmény 

Legyen például a vizsgált egyenlet 
Xt3 - 11*X12 + 43*X - 65 = 0 

Behívás és a RUN billentyű lenyomása után megjelenik a 
program címe, majd kérdést tesz fel ismertetési igényünkre. 

Ezt követően a program bekéri az együtthatókat. 

A HARMADFOKÚ TAG EGYÜTTHATÓJA? 1 
A MÁSODFOKÚ TAG EGYÜTTHATÓJA? -11 
AZ ELSŐFOKÚ TAG EGYÜTTHATÓJA? 43 
AZ ALLANDO TAG? -65 
AZ EGYENLETNEK EGY VALÓS GYÖKE VAN 
U1 = 1,82136721 U2 = -0,488033874 

VI = -0,488033872 V2 = 1,8213672 
Z1 = 1,33333333 Z2 = 1,33333332 

AZ EREDMENY: 

XI = 5 X2 = 4,99999999 
BILLENTYŰVEL TOVÁBB! 

KÉRI A KOMPLEX MEGOLDÁSOKAT? I/N a megnyo¬ 
másával) 

A MEGFELELŐ MÁSODFOKÚ EGYENLET 

1*X12 + (—6)*X + (13) = 0 

A KOMPLEX GYÖKÖK 

XA = 3 + 2*1 

XB = 3 - 2*1 

BILLENTYŰVEL TOVÁBB 

ÚJABB SZÁMÍTÁS? I/N 

Hasonlóan működik a program, ha az egyenletnek három 
valós megoldása van. Ilyen egyenlet például a következő: 

X13 + 4*Xt2 - 39*X + 54 = 0 

A megoldások: XI = 3, X2 = -9, X3 = 1,99999998 
Az X3 megoldás természetesen 2-nek tekinthető. 

A megoldások helyességéről úgy győződhetünk meg, hogy 
a gyököket behelyettesítjük az eredeti egyenletbe. A STOP bil¬ 
lentyű lenyomása után adjuk ki a következő parancsot: 

?Xt3 - 11*XI2 + 43*x - 65 

A RUN billentyű lenyomására nulla értéket kell kapnunk. 


Programkeresők! C-64-re 
Plus/4-cs, Cló-os legjobb 
programok olcsón kazettán, le¬ 
mezen. írjatok! Géptípus meg¬ 
jelöléssel! Akció! Bende Fe¬ 
renc, 8500 Pápa, Attila u. 5/b. 

C-64-re könyvelő, számlázó, 
nyilvántartó, felhasználói és 
játék programok 5 Ft-tól. 


Borítékért lista. Földesné, 
Szolnok, Győrffy J. u. 12. 
Tel.: 420—544. 

C-64 gyorstöltők 600, FI- 
NAL III., ACTION MK VI. 
2900 Ft. Válaszborítékért is¬ 
mertető. Mikroklub, 8100 
Várpalota, Pf.: 65. Tel.: 
88/371—439. 
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5180 XI=0:X2=SQR(ABSCC)):X3--SQRCABS(C)) 

5190 PRINT” X1=”»X1i” X2=”;X2;” X3=”;X3 
5200 GOTO 6000 

5210 PRINT” AZ EGYENLETNEK EGY VALÓS” 

5211 PRINT” ES KÉT KONJUGÁLT KOMPLEX” 

5212 PRINT” MEGOLDÁSA VAN”:PRINT 
5220 X1=0:X2=SQR(C):X3*-SQR(C) 

5230 PRINT” XI s ”iXl:PRINT 

5231 PRINT” X2= I*”JX2:PRINT 

5232 PRINT” X3 — I *”;X3: PRINT 
5240 GOTO 6000 

6000 PRINT” ÚJABB SZÁMÍTÁS? I/N” 

6010 GET AS: IF A$=”” THEN 6010 
6020 IF AÍ=”I” THEN 132 
6030 END 

7000 RÉM A HÁNYADOS FÜGGVÉNY 

7010 M2=l 

7020 Ml=M2*X1+B 

7030 M0=M1*X1+C 

7040 MA=M0*X1+D 

7050 PRINT” A MEGFELELŐ MÁSODFOKÚ EGYENLET”:PRINT 
7060 PRINT M2;”*XT2 + (”iMl;”)*X + (”>M0;”)” 

7100 PRINT” A KOMPLEX GYÖKÖK:” 

7110 DC-M1 T2-4*M2*M0 
7120 Dl=SQR(ABSCDC)) 

7130 TI —Ml /(2*M2):T2=D1/(2*M2) 

7140 PRINT 

7150 PRINT” XA*”;Tli”+”)T2;”*I”:PRINT 
7160 PRINT” XB-”íTlJ”-”JT2>”«I” 

7170 PRINT:PRINT” BILLENTYŰVEL TOVÁBB!” 

7180 GET A$:IF AS=”” THEN 7180 
7190 RETURN 

10000 PRINTCHRÍ(147):PRINT 

10010 PRINT” A PROGRAM A VALÓS EGYÜTTHATÓS” 

10020 PRINT” HARMADFOKÚ EGYENLETEK ÖSSZES” 

10030 PRINT” MEGOLDÁSÁT ADJA.”:PRINT 
10040 PRINT” HA AZ EGYENLETNEK EGY VALÓS ES KÉT” 
10050 PRINT” (KONJUGÁLT) KOMPLEX MEGOLDÁSA VAN,” 
10060 PRINT” A PROGRAM AZ EGY VALÓS GYÖK MEG-” 
10070 PRINT” 0LDASA UTÁN A TOVÁBBI KÉT KOMPLEX” 
10080 PRINT” MEGOLDÁST IS MEGKERESI.”:PRINT 
10090 PRINT” HÁROM VALÓS GYÖK MEGHATAROZASARA” 
10100 PRINT” A PROGRAM SZINTEN FEL VAN 
KÉSZÍTVE.”:PRINT 

10110 PRINT” BILLENTYŰVEL TOVÁBB!” 

10120 GET A$:IF A$=”” THEN 10120 
10130 RETURN 


o 


o 
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Kedves olvasónk! 

A1000, A500, A500+, A600, A1200, és egyéb Amiga számítógépekre, 
valamint C64-re, PC-re játék-, felhasználói, valamint PD demó prog¬ 
ramok megrendelhetők. Vízhatlan csomagolás, precíz munka, kedvez¬ 
mények. Bélyeggel ellátott válaszborítékért részletes tájékoztatót és 
programlistát küldünk. Amigán a lista mágneslemezen is kérhető egy 3.5-ös 
lemez és 50 Ft-os bélyeg ellenében. A borítékokat géptípusonként a követ¬ 
kező címekre lehet feladni: 

AMIGA: FRIEND TWO CREW, 1399 Bp„ 

Pf.: 701/55. Tel.: 135-12-89. (Ügyelet kizárólag naponta 16—20 óra között) 
C-64: BUMBLE BEE, 1116 Bp„ Sáfrány u. 44. 

Tel.: 162-77-24. 

PC: KUN SZILÁRD, 1151 Bp., Veresegyház u. 51. 

A C-64, AMIGA, PC ROVAT levélcíme: 

1399 Bp., Pf.: 701/55. 
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HARDVER 


O 

így mondom meg 
a nyomtatómnak... 


A nyomtatók számítógéppel való 
összekötésénél sajnos gyakran fordulnak 
elő kommunikációs problémák. Most 
megmutatjuk, hogyan értethetjük meg 
magunkat a nyomtatóval. 

* 

Mindaddig, amíg a nyomtatóval csak 
programlistákat nyomtatunk, aligha me¬ 
rülnek fel problémák. Azok csak akkor 
kezdődnek, amikor magasabb igényeket 
támasztunk, netalán új programot, szö¬ 
vegszerkesztő vagy rajzoló (grafikus) 
programot alkalmazunk, ilyenkor feltét¬ 
lenül tudnunk kell, milyen utasításokat ért 
meg a nyomtató. 

Manapság a nyomtatókat gyártó cé¬ 
gek többnyire nem mellékelnek semmifé¬ 
le utasításkészletet a készülékeikhez. A 
próbálkozás ilyenkor nem sokat segít, 
mert nem mindig ismerhető fel mindjárt 
egy utasítás hatása. 

Ha programozó akarja a nyomtatót 
használni, neki is kell ismerni a nyomtató 
vezérlését. 

Ezt megkönnyítendő közlünk egy 
utasításkészletet. Természetesen nem ter¬ 
jedhetünk ki mindenfajta nyomtatóra 
(mert abból többszáz fajta is létezik) és 
minden részletre. Ez megtöltene akár egy 
egész könyvet. Időközben azonban elter¬ 


jedt egy szabvány, ami eredetileg a japán 
Epson cégtől származik. 

Mivel ma szinte az összes nyomtató¬ 
ban van Epson-emuláció, ezzel a szab¬ 
vánnyal nagyon jól kijöhetünk. Vegyük 
azonban figyelembe, hogy minden kom¬ 
patibilitási ígéret ellenére az adott nyom¬ 
tatóban nem biztos, hogy minden utasítás 
létezik. 

A teljes (Epson) utasításkészlet az 1. 
és 2. táblázatban van összefoglalva. Az 
első oszlopban azok az értékek vannak 
felsorolva, amiket át kell vinni a nyomta¬ 
tóhoz. A változók, amelyekkel egy meg¬ 
határozott móduszt kiválaszthatunk, 
CHR$-utasításként adandók meg. Ha pél¬ 
dául a Startexterhez akarja a nyomtatót il¬ 
leszteni, akkor az egyes utasítások szám¬ 
értékei után kérdezve először még meg 
kell adni a móduszt is. Adja meg a megfe¬ 
lelő számértékeket. Ehhez egy példa: A 
soremelés távolságát 4/72 inchre akarjuk 
beállítani. Ehhez a 2. táblázatban a 27,65, 
CHR$ (n) számsort (szekvenciát) talál¬ 
juk. Az ,,n” helyére 4-et kell írni, a 
CHR$-utasítás akkor 52-t ad. A nyomta¬ 
tóhoz tehát a 27, 65, 52 számsort kell ki¬ 
küldeni, hogy a kívánságunk szerinti célt 
elérjük. 

Basicban is hasonlóan van ez. Elő¬ 
ször a nyomtatóhoz meg kell nyitni egy 
adatcsatornát. Attól függően, hogy a 


nyomtatót a soros portra interfészen ke¬ 
resztül csatlakoztattuk-e, vagy a felhasz¬ 
nálói párhuzamos portra, a szükséges uta¬ 
sítások némileg eltérnek. Soros csatlako¬ 
zás esetén a csatoló (interfész) kéziköny¬ 
véből ki kell keresni az ún. lineáris csator¬ 
nához megfelelő másodlagos címet. A li¬ 
neáris csatorna azt jelenti, hogy ebben a 
beállításban a számítógép által küldött 
minden jel közvetlenül, minden változta¬ 
tás nélkül jut el a nyomtatóhoz. Nem tör¬ 
ténik tehát semmi konverzió (átalakítás) a 
Commodore ASCII-jelkészletéhez ké¬ 
pest. Ez fontos, mert ha az utasítássoroza¬ 
tot konvertálnánk, biztosan valamilyen 
furcsa eredményt kapnánk. A legtöbb 
csatolóhoz (interfészhez) az ,,1” vagy a 
„7” másodlagos cím használandó. Az 
Open utasítás tehát ilyen lesz: 

OPEN 4,4,1 
illetve 

OPEN 4,4,7 

Ha azonban Centronics-csatolóval 
használja a rendszert, gyakran semmiféle 
másodlagos cím használatára nincs szük¬ 
ség. Az Open utasításban egyszerűen el 
lehet hagyni. Kétség esetén nézzen utána 
a lineáris csatorna címszó alatt a kezelési 
kézikönyvben. 

Ezt követően máris küldhetők ki a 
nyomtatóhoz az utasítások. Ha a program 
futása során éppen nem vagyunk biztosak 
abban, hogy a nyomtatónk milyen állapot¬ 
ban van, ajánlatos a Reset-utasítást ki¬ 
küldeni: 

PRINT#4,CHR$(27);CHR$(64) 

Figyelni kell arra, hogy minden uta¬ 
sítást a CHR$-utasítás segítségével ad¬ 
junk ki, különben a nyomtató a kiküldött 
számokat kinyomtatná. A számítógép 
ugyanis ekkor a megfelelő ASCII-jelet 
adná ki a nyomtatónak, nem a CHR$ mö¬ 
gött értelmezett utasítást. 

Pontosan ugyanilyen módon kell 
minden más utasítást is kiadni. 

Végül — még akkor is, ha ez nincs 
szigorúan megkövetelve — az adatcsator¬ 
nát le is kell zárni így: 

COLSE 4 

Egyébként természetesen egyszerre 
több utasítás is kiküldhető, magától érte¬ 
tődően mindenkor az ESC(CHR$(27)) 
bevezetésével. 


C-64 képdigitalizáló 


Megdöbbentő lehetőség a C—64 tulajdonosok 
számára az a színes képdigitalizáló, amely 
tesztelés céljára a kezünkbe került. A készü¬ 
lék a gép USER-portjára csatlakoztatható, egy 
videó bemenettel van ellátva, ahová bármi¬ 
lyen külső viedojel csatlakoztatható (Pl. video¬ 
kamera, videolejátszó). Található még a digi- 
talizálón két pot-méter, ami a fényesség és 
kontraszt beállítására szolgál. 

Tesztelésünk folyamán a gyári beállítások 
megfelelőnek bizonyultak. A kimentett kép 
KOALA-Paint formátumban kerül a lemezre, 
amit bárhol felhasználhatunk a továbbiakban. 
A digitalizált kép a hasonló készülékek kép¬ 
minőségéhez képest meglepően jónak bizo¬ 


nyult, a 16 valódi színnek köszönhetően. így 
a C-64 számítógép lehetőségeit teljes mérték¬ 
ben kihasználja. A hozzáadott szoftver angol 
és német nyelvű. A mellékelt lemezen három 
szoftver található, az egyik a digitalizáló prog¬ 
ram, a másik a tárolt képek gyors megtekin¬ 
tésére szolgál, a harmadik Demo-szerúen je¬ 
leníti meg a képeket. A könnyű kezelhetőség 
érdekében magyar, angol, német nyelvű, ké¬ 
pekkel illusztrált dokumentáció található a 
csomagban. 

A termék német gyártmány, hazai forgalma¬ 
zója az ACOMP Kft. A készülék 1592 Ft + 
ÁFA-s áron kerül forgalomba. Postai utánvétellel 
is megrendelhető. Cím a hátó borítón! 
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Nyomtató utasítások (ESC/P, Epson-szabványos printer kódok) 


ASCIIkód 

Név 

Funkció 

Megjegyzés 

07 

BEL 

Nyomtató hangjelzés 


08 

BS 

Egy betűhellyel visszalépés 


09 

HT 

Kővetkező tabulátorhelyre ugrás vízszintesen 


10 

LF 

Soremelés 


11 

VT 

Következő tabulátorhelyre ugrás függőlegesen 


12 

FF 

Lapemelés 


13 

CR 

Kocsi vissza; nyomtatófejet a sor első pozíciójára állítja 


14 

SO 

Széles betűkkel írást egy sorra bekapcsolja 

SO és Sl egyidejűén kövér betűket ad 

15 

Sl 

Keskeny betűkkel való írást egy sorra bekapcsolja 


17 

DC1 

,,On line" la számítógép vezérlési rendszerébe kapcsolja a 


18 

DC2 

nyomtatót! 

Kikapcsolja a keskeny betűkkel írást 


19 

DC3 

,,Off line" la számítógép vezérlési rendszeréről lekapcsolja 


20 

DC4 

a nyomtatót! 

Kikapcsolja a széles betűkkel való írást 


24 

CAN 

Kitörli a nyomtató pufferjét 


27 

ESC 

Következő jelnek vagy sorozatnak különálló jelentése van 

Speciális nyomtatóutasításokat vezet be lld. az ESC- 

127 

DEL 

Legutoljára kapott jelek törlése 

jelsorozatokat a 2. táblázatban) 

ESC-jelsor 

Név 

Funkció 

Megjegyzés 

27,14 

ESC SO 

Széles betűkkel való írást bekapcsolja 


27,15 

ESCSI 

Keskeny betűkkel való írást bekapcsolja 


27,33,n 

ESC! 

Nyomtató mód kiválasztása 

,,n" értéke 0-63 közötti lehet, lásd az *1 lábjegyzetet 

27,45 

ESC- 

Aláhúzást bekapcsolja 

27,47,n 

ESC/n 

Függőleges tabulátorjelet beállítja 

,,n" értéke 0-7 közötti lehet 

27,48 

ESCO 

Soremelés 1/8 inch 


27,49 

ESC 1 

Soremelés 1/72 inch 


27,50 

ESC 2 

Soremelés 1/6 inch 


27,51,n 

ESC 3n 

Soremelés 1/216 inch 

,,n" értéke 0-255 közötti lehet 

27,52 

ESC 4 

Átvált az alternatív betűkészletre 


27,53 

ESC 5 

Visszavált a normál betűkészletre 


27,54 

ESC 6 

Kibővíti a nyomtatható jelek tartományát 

lásd a *2 lábjegyzetet 

27,55 

ESC 7 

Kikapcsolja az ESC 6 hatását 


27,56 

ESC 8 

Kikapcsolja a papírvég figyelést 


27,57 

ESC 9 

Bekapcsolja a paplrvég figyelést 


27,60 

ESC < 

Kétirányú nyomtatást egyirányúra váltja 


27,61 

ESC = 

A következő adat legmagasabb bitjét 0-ra állítja 

Csak 7-bites kódokat vesz figyelembe 

27,35 

ESC f 

A legmagasabb bitet engedi át 


27,62 

ESG> 

A következő adat legmagasabb bitjét 1-re állítja 

Az ASC11 -táblázatnak csak a felső felét veszi figyelembe 

27,64 

ESC @ 

Nyomtató RÉSÉT 

Nyomtató a bekapcsolása utáni (alap-) állapotot veszi fel 

27,65,CHR$(n) 

ESC A 

Soremelés n/72 inch 


27,66,CHR$lnl... 

ESC B 

Függőleges tabulátorjelet tesz az n. sorba 

16 tabulátorhely adható meg 

27,67,CHR$ln! 

ESC C 

Oldal hossza sorok számával megadva 


27,67,48,CHRSInl 

ESC C10) 

Oldal hossza inch-ben 


27,68,CHR$ln1), CHR$ln2),...CHR$lnk),48 

ESC D 

Vízszintes tabulátorhelyek beállítása 

lásd a *3 lábjegyzetet 

27,69 

ESC E 

Kövér betűkkel való nyomtatást bekapcsolja 

Nyomtatás sebessége csökken 

27,70 

ESC F 

Kövér betűkkel való nyomtatást kikapcsolja 


27,71 

ESC G 

Kétszeres nyomtatást bekapcsolja 

1/216 inch eltolással kétszer nyomtatja végig a sort 

27,72 

ESC H 

Kétszeres nyomtatást kikapcsolja 


27,73,CHR$(n) 

ESC 1 

Vezérlőkód/nyomtatható jel közötti választás 

Ha n = 0, akkor 0 -31 és 128-159 között vezérlőkódok, 

27,74 

ESC J 

Adott sorra a soremelés 1/216 inch 

a többi nyomtatható jel 

Soremelés törli 

27,75,CHR$(n1), CHR$(n2l, CHR$(d1), 

ESC K 

Bittérkép grafika, kis felbontás 

Az ESC K utáni adatok bittérképként nyomtatódnak. 

CHR$(d2l, CHR$(dn1, n2l 

27,76, CHR$(nl), CHR$(n2), CHR$(dl), 

ESC L 

Bittérkép grafika, nagy felbontás 

Ld. *4 lábjegyz. 

Az ESC L utáni adatok bittérképként nyomtatódnak. 

CHR$(d2), CHR$(dnl,n2) 

27,77 

ESC M 

Elité betűtípusra váltás 

Ld. *4 lábjegyz. 

27,78,CHR$(n) 

ESC N 

Perforációnál (lapvégnéll n sor ugrás 

Lapvégnél n soremelés 

27,79 

ESCO 

Perforációnál ugrás kikapcsolása 


27,80 

ESC P 

Pica betűtípusra váltás 


27,81,CHR$ln) 

ESC Q 

Jobb margó beállítása 

Nyomlatótól függően n = 2 - 233 között lehet 

27,82,CHRSInl 

ESC R 

Nemzeti betűkészlet kiválasztása 

n = 0-8 között lehet. Ld. *5 lábjegyz. 

27,83,CHRSInl 

ESC S 

Nagy/kisbetűre váltás 

ESC T törli 

27,84 

ESC T 

Nagy/kisbetűre váltás letiltása 


27,85,CHRSInl 

ESCU 

EGY/kétirányú nyomtatás átváltása 

n = 0:kétirányú, n = begyirányú 

27,87,CHRSInl 

ESC W 

Széles betűkkel való írás ki/bekapcsolása 

n = Otkikapcsol, n = bbekapcsol 

27,89,CHRSInl), CHR$(n2l, CHR$(d1), 

ESC Y 

Bittérkép grafika, kétszeres felbontás, kétszeres sebesség 

Az ESC Y utáni adatok bittérképként nyomtatódnak. 

CHRS(d2l, CHRSIdnl, n2l 

27,90,CHRSInl), CHRS(n2), CHRSIdlI, 

ESC Z 

Bittérkép grafika, négyszeres felbontás 

Ld. *4 lábjegyz. 

Az ESC Z utáni adatok bittérképként nyomtatódnak. 

CHR$(d2l, CHRSIdnl, n2l 

27,105,CHRSInl 

ESC i 

Azonnali nyomtatás ki/bekapcsolása 

Ld. *4 lábjegyz. 

n = 1 :azonnal nyomtat, n = 0;csak a megtelt sort nyom- 

27,106,CHRSInl 

ESC j 

Papír visszahúzás n/216 inch mértékben 

tatja ki 

27,108,CHRSInl 

ESC 1 

Bal margó beállítása 

Nyomtatótól függően n = 0 - 229 lehet 

27,112,CHRSInl 

ESC p 

Arányos/normál nyomtatás átkapcsolás 

n = Omormál, n = bárányos, ld. *6 lábjegyz. 


(A táblázat folytatódik) 
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(A táblázat folytatása) 


ESC-jelsor 

Név 

Funkció 

Megjegyzés 

27,115,CHR$ln) 

ESC s 

Teljes/fél sebességgel való nyomtatás 

n = 0:teljes, n = 1:fél sebesség: kisebb zaj 

27,37,CHR$fnl,48 


Jelgenerátor választás 

n = 0:ROM-ból, n = Tbetöltött készlet 

27,58,48,48,48, 

ESC: 

ROM-jelkészlet másolása a változtatbaló memóriaterületre 

Csak ha kevés jelet kell változtatni 

27,38,48,CHR$lnl, CHR$(m), CHR$la), 
CHRSlpD, CHR$lp2)...CHR$!p11) 


Egy változtatott jel átvitele 

Ld. '7. lábjegyzetet 

27,42,CHR$lm), CHRSInl), CHR$ln2), 
CHRÍldlI, CHR$(d2I...CHR$ldn1, n2) 

ESC • 

Bittérkép grafika 

Az ESC * utáni adatok bittérképként nyomtatódnak. 

Ld. '8. lábjegyz. 


Lábjegyzetek: 


*1 E szám minden bitjének különleges jelentése van: 

Ha a 0. bit = 0: Elité, ha = 1: Pica 

az 1- bit mindig = 0, 

a 2. bit = 1: keskeny betűk, 
a 3. bit = t: kövér betűk, 
a 4. bit = 1: kétszeres nyomtatás, 
az 5. bit = 1: széles betűkkel nyomtatás, 
a 6. és a 7. bit mindig = 0. 

A bitek egymással tetszés szerint kombinálhatók. 

•2 A 128-159 és 255 ASCII kódok is kinyomtathatók, mint kiegészítő különleges jelek. 

*3 A nyomtatótól függően n értéke 1-137 vagy 233 lehet, egyszerre 32 érték, adható meg. 

*4 ni és n2 az átviendő bájtok számát határozzák meg, ahol ni az alacsony, n2 a magas bájtok számát jelenti. 

•5 0: USA, 1: Franciaország, 2: Németország 

3: Anglia, 4: Dánia, 5: Svédország, 

6: Olaszország, 7: Spanyolország, 8: Japán. 

•6 Proporcionális az a nyomtatási mód, amikor az egyes betűk a nyomdai pontban kifejezett szélességű helyet foglalnak el a papíron, úgy, mint a könyvekben, folyóiratokban, újságokban. 

*7 n a helyettesítendő jel ASCII-kódjának felel meg, amihez több ASCII-kód rendelhető hozzá. Ha csak egy lesz hozzárendelve, akkor n = m. A pl - pH adatok az új jel pontmátrixában a függőleges 
oszlopok pontértékének az összegei. 

•8 m a feloldóképességet, ni és n2 az átviendő grafika-bájtok számát (ni = alacsony, n2 = magas). 


Tippek 

Trükkök 


Szín görgető: 

SYS49152 hatására a fölső sorban lévő színeket jobbról balra 
görgeti. A demo önmagáért beszél. 


NEW TAB: 

Ebben a programban egy új utasítás van a —T,X: PRINT 
"szöveg " 

Indítás: SYS49152 

Az T,X-nél az X-ben meg kell adni azt a koordinátát ahova akar¬ 
juk rakni a „szöveg’-ünket. 
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RÉM a#######*#########*##*#####*# O 
RÉM # NEW TABCO C-64* 

RÉM * X NIC : SVS49 i 52 AKT > *-T, X • ? " N " # 
RÉM *■ > > *■ 

RÉM * KÉSZÍTETTE- BRUCE MAESTRO * 

RÉM *###******##****#**#***#**##* o 

: 

FÓR 1= 49152 TO 492IS 
>:READA=FOKÉI,A : S=S+A O 

nexY 

IF SO 6888 THEN PRINT"HIBA" q 
DATA 169,011,141,008,063,169, 132 
DATA 141,089,003,096,032,115,000 
DATA 201,095,240,006,032,121,000 O 
DATA 076,231,167,032,115,000,201 
DATA 084,208,©03,032,039,192,076 Q 
DATA 008,175,255,255,032,115,000 
DATA 032,253,174,032,158,183,180 
DATA 000,142,211,000,076,174,167 O 
DATA 180,800,142,001,212,032,253 
DATA 174,032 ._- 
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RÉM ***************************** 
REt'1 * SZÍN GOROETO C-64* 
RÉM * , * 
RÉM * KÉSZÍTETTE- BRUCE MAESTRO * 
RÉM * COLASZ ENDRE > * 
RÉM ***************************** 

FÓR 1= 49152 TO 49177 
- -READA- FOKÉI,A -S-S+ft 
NEXT 

IF SO 3872 THEN PRINT“HIBA" 

DATA 169,000,162,000,188,000,216 
DATA 234,232,183,000,216,202,157 
DATA 000,216,232,224,039,208,242 
DATA 148,033,216,096,255 


RÉM 


DEMO 


PR INT "73 AKAROD LÁTNI A DEMOT SÍI! 
GETfl* 

IFA*="N"THEH END 
IFAT—"I“THEN GOTO330 
GOTO290 

PRINT"CB! PROGRaRMMED tüEV 

kBRUCWE MAEBSTRO" 

RÉM ==1-EL BALRA GÖRGETI A SZINT® 
SVS49152 

RÉM —LASSÍTJA A GORGETEST== 

POR I = 0T0255--NEXT 
GOTO 380 
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Grafikus dolgok 


A C-64 grafikus képességei rendkívüliek, de a Basic-ben 
nem használhatók ki minden további nélkül. 

Az a sok-sok színes kép, amit a C-64-ből elő lehet csalogat¬ 
ni, bizonyára nagyban hozzájárulhat ennek a számítógépnek a 
nagy sikeréhez. Valóban a grafikus képességekért felelős áram¬ 
köri lapkának (a VIC-csipnek) a lehetőségei, képességei oly¬ 
annyira nagyok, hogy azokat maga a Commodore cég sem isme¬ 
ri teljesen. Ez-e az oka annak, hogy a Basic programozási nyelv¬ 
ben nincsenek grafikus utasítások, vagy az, hogy az volt a véle¬ 
mény, hogy a grafika az ezen teljesítményosztályba tartozó szá¬ 
mítógépeken úgy sem játszik szerepet, ma már nem deríthető ki, 
és ezt tudomásul kell vennünk. 

A legtöbb „grafikarajongó” ugyan azt állítja, hogy a képe¬ 
ket és az optikai effektusokat csak gépi kódban lehet jól progra¬ 
mozni. De ha a program futásának a sebességére nem helyezünk 
nagy súlyt, Basic-ban is célhoz jutunk, mégpedig nagyobb prog¬ 
ramozási munkaráfordítás nélkül is. Ez csupán a hogy-mint-től 
(know-how) függ. 

Ehhez először is néhány alapvető tudnivaló a VIC (Videó 
Interface Controller = videó csatoló vezérlő) áramköri lapka 
működéséről. Ez a csip végzi a C-64-ben a tulajdonképpeni mik¬ 
roprocesszor mellett a munka oroszlánrészét. Ez építi össze a 
mindenkori memóriatartalom alapján a videoképet, és generálja 
a monitor számára a vezérlőjeleket. 

A monitor másodpercenként 25 képet jelenít meg, és ezek 
mindegyike 625 pontsorból áll. Elképzelhetjük tehát, milyen 
gyors és nehéz munkát végez a VIC. 

Szöveg módban a képernyő 25 sorból, egyenként 40 betűből 
áll. Mindegyik betű 8x8 pontból áll. Összesen tehát 40 X 8=320 
pont van a képernyőn vízszintesen és 25 X 8=200 pont függőlege¬ 
sen. Az egyes betűknek a képe, pontmintája a karakter-ROM- 
ban nyolc bájtos úgynevezett pakettekben van tárolva. A bájtok 
minden egy bitje, amihez pont van hozzárendelve, 1 értékűek, 
és ott a képernyőn pont lesz látható, míg amelyik bit értéke 0, 
ott a pont nem látható. Azt, hogy milyen karakter, betűkép lesz 
látható, a videomemória tartalmától függ. Ez az 1024—2023 cí¬ 
meken van. Ennek a memóriaterületnek minden egyes bájtja an¬ 
nak a karakternek a kódját tartalmazza, amelyiknek az adott kép¬ 
ernyőhelyen látszódnia kell. Az első 40 bájt tartalmazza az első 
sor kódjait, a 41—80. bájtok a 2. sorét és így tovább. Ha pl. az 
1025 címen 65 érték szerepel, akkor a VIC a képernyő első sorá¬ 
nak második betűhelyén annak a betűnek a pontmintája lesz lát¬ 
ható, ami a karakter-ROM-ban a 65. memóriahelyen áll, vagyis 
az ,,a” betű. 

Grafikus módban a dolog sokban hasonló. A képernyő felol¬ 
dóképessége itt is 320x200 pont. A pontokat azonban itt nem 
a karakterkészlet vezérli, hanem erre a célra a RAM egy része 
van felhasználva. Mivel a teljes képernyőtartalomhoz 
320x200=64000 bit, vagyis 8000 bájt szükséges, a memóriá¬ 
nak egy nem jelentéktelen része elvész a felhasználó számára. 
A mi példánkban ez a tartomány a 8192 címen kezdődik. 

De hát hogyan is mondjuk meg a VIC-nek, hogy most grafi¬ 
kát akarunk ábrázoli a képernyőn? Mint a C-64 legtöbb csipjét, 
a VIC-et is memóriarekeszeken (regisztereken) keresztül vezé¬ 
reljük. A felhasználó szempontjából nézve ezek is a fő memória¬ 
tartomány egyes címei. Ha ezekre a címekre bizonyos meghatá¬ 
rozott értékeket írunk be, a VIC-et sokféle módon tudjuk befo¬ 


lyásolni. Képzeljük el ezeknek a tárcímeknek a bitjeit úgy, mint¬ 
ha kapcsolók lennének, amikkel a csip számos funkcióját ki és 
be tudjuk kapcsolgatni. 

Az első VIC-vezérlő rekeszeim (regiszter) az 53248. A 
VIC-nek összesen 46 rekeszcíme van. 

A grafikára való átkapcsolásért a 18 rekeszeim a felelős. Itt 
a 6. bitet kell átállítani. A 25 rekeszeimen van a videomemória- 
terület kezdőcímének az információja. A mi esetünkben a helyes 
érték, aminek itt állni kell, a 24. 

A biteknek a képernyőpontokhoz való hozzárendelése szo¬ 
rosan támaszkodik a karakterábrázolásra, emiatt bizony egy ki¬ 
csit komplikált. Az első bájt a képernyő felső szélén a baloldalon 
az első pontsorban lévő első nyolc pontot vezérli, a második bájt 
az alatta (vagyis a második pontsorban) lévő nyolc pontot és így 
tovább egészen a nyolcadik bájtig, ami a nyolcadik pontsorban 
lévő nyolc pontot határozza meg. Ez eddig az első normál karak¬ 
ter helyének felel meg. A 9. bájt már ismét az első pontsor máso¬ 
dik nyolc pontját képviseli, vagyis a második karakter helyén a 
felső nyolc pontot. A továbbiak egészen a 16. bájtig a felső karak¬ 
tersor második betűjének megfelelő 8 x8-as pontmátrixot ábrá¬ 
zolja. A játék így megy tovább az első nyolc pontsor (vagyis az 
első karaktersor) végéig, az első 320 bájton. 

Ezután következik a képernyő második karaktersora, ami 
megint csak 40-szer 8 X 8-as pontmátrix-képből alakul ki (2. 
ábra). Ezeknek a 8X8-as pontmátrix-mezőknek mindegyiknek 
saját háttérszíne lehet, amiknek az értéke az 1024—2023 közötti 
memóriacímeken az úgynevezett szövegvideo-memóriaterüle- 
ten van tárolva. 

Ez az egész eljárás nagyban leegyszerűsíti a VIC munkáját, 
jóllehet a felhasználónak fáradságos munkájába kerül, mire át¬ 
számítja az ábrázolandó pont koordinátáit memóriahely-címre. 
Ha pl. a 120, 30 koordinátájú vagyis a képernyő bal szélétől a 
120., felülről a 30. helyen lévő pontot akarjuk kivilágítani, ábrá¬ 
zolni, akkor bizony fáradságos munkába telik a bájt- és bitsor¬ 
szám meghatározása. Vagy talán egyből meg tudnánk mondani 
a helyes értéket? Aligha! 

Valamelyes gondolkodás után természetesen lépésről lépés¬ 
re meg tudnánk közelíteni a helyes értéket, így a koordináta át¬ 
számítástól való félelmünk is elmúlhatna. Azt, hogy hányadik 
8 képpont magasságú képernyősorban van a fenti koordinátájú 
képpont, úgy kapjuk meg, hogy az Y-koordinátát vagyis a 30-at 
8-cal elosztjuk, és ennek az egész részét vesszük. 

BZ = INT (30/8) 

A mi esetünkben tehát a képpont a 3. sorban lesz. Azt ezek 
után már tudjuk, hogy a bájt sorszáma a grafikus memóriaterüle¬ 
ten 3 X320 és 4x320 közötti érték, mert hiszen egy sor 320 bájt. 
Ennek a képernyősornak a kezdőcíme ezek után: 

BZ = INT (30/8) *320 = 960 

A nyolc lehetséges pontsorból (egy képernyősor nyolc pont¬ 
sorból áll) a helyes pontsor kiválasztására az Y-érték alsó három 
bitjét használjuk fel. Ezek nem mást mutatnak, mint az osztás 
maradékát. 

BZ = INT (30/8) *320 + (30 AND 7) = 966 
Ezzel megvan a helyes pontsor kezdőcíme. Most már természe¬ 
tesen az X-koordinátát (120) is figyelembe Kell venni. Ez adja 
meg, hogy az előbb meghatározott pontsorból melyik bájt van 
éppen érintve. Mivel minden bájt nyolc pontot tartalmaz, először 
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az X-értéket el kell osztani 8-cal, és ezúttal is az osztás eredmé¬ 
nyének az egész részét kell felhasználnunk. Ezenkívül egy pont¬ 
sor bájtjainak a címei a memóriában egymástól nyolc bájtnyira 
vannak. így aztán az osztás eredményét 8-cal megszorozzuk. A 
végleges képlet a bájt címének kiszámítására így hangzik: 
ADR = INT (30/8)*320 + (30 AND 7) = 966 + 

+ INT (120/8)*8 
vagy teljesen általánosan 

ADR = INT (Y/8)*320 + (Y AND 7) = 966 + 

+ INT (X/8)*8 

Most kiszámítottuk, hogy a kivilágítandó ponthoz melyik 
bájt tartozik. Most már csak az hiányzik, hogy ebből a bájtból 
melyik bitet kell „bekapcsolni”. Ehhez nyújt segítséget az X- 
érték eddig fel nem használt alsó három bitje. A 
ÉRT = (X AND 7) 

kiszámításával megkapjuk a „bekapcsolandó” bit sorszámát. 


Mindenesetre itt is van egy különlegesség. A pontok nem a bitek 
sorrendjében kerülnek a képernyőre, vagyis az első pont azonos 
az első bittel, a második pont a második bittel. A dolog épp for¬ 
dítva van; emiatt a kapott eredményt ki kell vonni 7-ből. így lesz 
a 7-ből 0, a 6-ból 1, és így tovább. 

Végül ezt a számot használjuk fel arra, hogy ezzel a kettőnek 
a megfelelő hatványát számítsuk ki, mivel egy bájtban minden 
egyes bit a kettes alap megfelelő hatványát képviseli. Az érték 
(ÉRT) képlete végülis így hangzik: 

ÉRT = 2 1 (7 - (X AND 7)) 

Ha ezt az „ÉRT” értéket a korábban kiszámított „ADR” 
memóriahelyre, ill. címre beírjuk, a képernyőn a megcélzott 
pont ki lesz világítva. 

Most már megnyugodhatunk, fellélegezhetünk, miután a 
szerző ezt a képletet a „fejünkhöz vágta”. Ha most még egy pél¬ 
dát végigszámolunk, elismerhetjük, hogy ez nem is olyan nehéz. 


Intel 586 Pentium (P5) 


Sok PC tulajdonos várta már, az 
1993. március 22-i napot. Ezen a napon 
Santa Clara-ban, kaliforniában az Intel 
cég bejelentette az új, pentium lapkákból 
készült 586-os processzorét, a P5-öt. Ez 
az ötödik generációs processzor (a 486 
után) hihetetlen gyorsasággal felülmúlja 
az „öreg” 486-os testvérét: csaknem öt¬ 
ször gyorsabb egy 486 DX 33Mhz-s pro¬ 
cesszornál. 

Már erre a gépre is írtak új felhaszná¬ 
lói programokat, amik jócskán kihasznál¬ 
ják ez új processzor tulajdonságait, de ez 
a CPU is alulról kompatibilis a többi PC- 
vel, hiszen akár egy 286-os gépen futó 
programot is használhatunk rajta. 

Az új felhasználási kör azonban az új 
grafikus felhasználói felületek: a Micro¬ 
soft kifejlesztette rá az új Windows NT-t, 



ami jóval gyorsabb, mint a régebbi, 3.1-es 
Windows. Kitűnően használható CAD/ 
CAM alkalmazásokhoz, műszaki ter¬ 
vezéshez, és — számításokhoz, — ani¬ 
mációk, és 3D ábrák kiszámoltatásá- 
hoz. 

Az Intel két változatot fejlesztett ki a 
processzorból: egy 60, és egy 66 Mhz-es 
sebességűt. 

Ez utóbbi 112 millió műveletet végez 
el másodpercenként. 

A processzorban két darab 8K-s in¬ 
tegrált cache memória, valamint egy 64 
bites külső, és egy 256 bites belső adat¬ 
busz található meg. 

Egy 486-os processzor 1 millió tran¬ 
zisztort tartalmazott, míg a Pentium 3,1 
milliót. 

Az idén kezdte el az Intel az ún. 


Overdrive processzor gyártását, amely¬ 
nek segítségével egy 486 DX 2-es alaplap 
upgrade-elhető P5-re. 

A Pentium processzor az Amerikai 
árak szerint 1500 dollár között mozog, de 
gondoljunk csak arra, hogy hazánkban is, 
amikor megindult a C-64 gyártása, az is 
80 000 Ft volt, s tehát 1995-re ez az ár va¬ 
lószínűleg lejjebb fog menni, s eszerint a 
XT 286, 386, 486 is olcsóbb lesz. 

A leírás az Intel cég prospektusa és 
engedélye alapján készült. 

Aki az új processzorról bővebb infor¬ 
mációt szeretne kapni, az a következő 
címre írjon: 

Intel Literature Packet #JP—53, P.O. 
Box 7620, Mt. Prospect, IL 60056-7641. 

Kun Szilárd 


JÚLI-AUGUSZT. 












PROGRAM 


Cf 

Szerencsekerék 


A program kezelése 

Betöltés: LOAD "*",8 
Indítás: RUN 

Indítás után bejelentkezik a menü, 
ahol 4 menüpont közül választhatunk. 

1. Új feladványok létrehozása. 

2. Játék. 

3. Új adatlemez előkészítése. 

4. Program vége. 

1. Új feladványok 
létrehozása 

Beolvassa a SORSZÁM nevű file-ből 
a feladványok számát, és ettől a sorszám¬ 
tól kezdve automatikusan sorszámozza a 


feladványokat. Ha előtte nem volt előké¬ 
szítve a lemezünk, akkor figyelmeztet, 
INCIALIZÁIJA a lemezt, majd visszatér 
a menübe. Amennyiben előkészített le¬ 
mezzel dolgozunk, a fiié beolvasása után 
megvizsgálja a sorszámot, és ha a szám el¬ 
érte a 663-at, figyelmeztet, hogy tele van 
a lemez, és visszatér a menübe. Ha nincs 
tele a lemez, akkor következik az adatok 
beadása. 

1. FELADVÁNY: írjuk be a feladvá¬ 
nyunkat (max. 36 karakter) és nyomjuk le 
a RETURN billentyűt. 

2. TÍPUSA: Adjuk meg a típusát (pl. 
név, cím, közmondás, építmény stb.), 
majd RETURN. 

3. MÁSSALHANGZÓK SZÁMA: 
Meg kell adni, hogy a feladványban hány 
darab mássalhangzó van, és ismét RE¬ 
TURN. 


Ha mindez megvan, egy kérdés kö¬ 
vetkezik: — FELÍRJAM? (I/N) — Ha N-t 
adunk, akkor újra kéri az adatokat. Ha I-t, 
akkor felírja az adatokat a lemezre, majd 
egy újabb kérdés következik: 

- VAN MÉG? (I/N). Ha „I”, akkor 
új adatokat kér, ha ,,N”, akkor felülírja a 
SORSZÁM nevű file-t és visszatér a me¬ 
nübe. 

Ha viszont az adatok írása közben a 
sorszám eléri a 663-at figyelmeztet, hogy 
a lemez betelt, majd visszatér a menübe. 

A program az adatokat soros file-ben 
tárolja. 


2. Játék 


Választása után a program bekér egy 
adatlemezt, majd a RETURN billentyű 
megnyomására vár. Ha nem szerepel fel¬ 
advány a lemezen, vagy nem adatlemez 
van a meghajtóban, figyelmeztet, IN- 
CIALIZÁUA a lemezt, és visszatér a me¬ 
nübe. Ha talált adatot a lemezen, akkor 
bejelentkezik a játékszabály, ahonnan az 
F7-tel tudunk továbbmenni. Ezután meg 
kell adnunk az első, majd második játékos 
nevét (max. 10 karakter), és egy számot, 
ami alapján betölti a program a felad¬ 
ványt, és kezdődhet a játék. 

A program mindenre figyelmeztet* 
hogy ki következik, és mit csináljon. A 
pörgetésre 5 másodpercünk van, és ha 
nem pörgetünk ez időn belül, akkor auto¬ 
matikusan pörget a program. A pörgetés 
után 25 másodpercünk van a gondolko¬ 
dásra. Ha nem adunk meg mássalhangzót 
a 25 másodperc alatt, akkor a másik játé¬ 
kos következik. Ha adunk mássalhangzót, 
egy vizsgálat következik, hogy van-e a fel¬ 
adványban valahol, és ha van akkor kiírja 
a megfelelő helyre, és ismét pörgethe¬ 
tünk. Amennyiben nem talál, a másik já¬ 
tékos következik. A felhasznált mással¬ 
hangzók kiíródnak a kép aljára. Ha ma¬ 
gánhangzót, vagy olyan mássalhangzót 
adunk amit már egyszer felhasználtunk, 
hibának számít. 

Amennyiben valaki meg szeretné fej¬ 
teni a feladványt, nyomja meg az FI bil¬ 
lentyűt, gépelje be a szöveget, majd RE¬ 
TURN. Ha nem találta el, a másik játékos 
következik. Ha viszont sikerült kitalálni, 
akkor kiíródik a képernyőre, és átkerü¬ 
lünk a ponttáblázatba, ahonnan az F7-tel 
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A programban használt változók 

A$ — Az első játékos neve. 

B$ — A második játékos neve. 

SM — A lemezen szereplő feladványok száma. 

ZE — A zene hangértékei. 

WE — A fordulók száma. 

X — A választott feladvány száma. 

C$ — Feladvány. 

CC$ — A feladvány típusa. 

CS — A mássalhangzók száma. 

C — A feladvány karaktereinek száma (szóközzel együtt). 

D$ — Négyzetek, szóköz. 

D — A játékosok közötti váltás. 

HH — Hangértékek hossza. 

EK — Ha értéke 1, akkor a játékosok közötti váltásnál a zene elmarad. 

TY — Ha értéke 1, akkor van olyan mássalhangzó, amit leütöttünk. 

BU — A feladványban létező, felhasznált mássalhangzók száma. 

KE — Ha értéke 1, akkor kéri a megfejtést, ha 2, akkor elárulja. 

Q — Pörgetett pontérték. 

WW$—• A felhasznált mássalhangzók. 

MU — A leütött mássalhangzó pozíciója a képernyőn (tabulátor). 

J — A felhasznált mássalhangzók száma (ami nincs a feladványban, az is). 
Pl — Ha értéke 1, akkor olyan mássalhangzót kértünk ami már egyszer volt. 
M$ — Megfejtés. 

KA — Az első játékos egy fordulón belül elért pontszáma. 

KK — A második játékos egy fordulón belül elért pontszáma. 

YY$ — Az egy fordulón belüli nyerő játékos neve. 

YY — Az egy fordulón belüli nyerő játékos pontszáma. 

FF — Az első játékos összpontszáma a ponttáblázatban. 

FA — A második játékos összpontszáma a ponttáblázatban. 

KI$ — Az összesítésben nyerő játékos neve. 

KI — Az összesítésben nyerő játékos pontszáma. 

X$ — A választott feladvány száma átalakítva füzérváltozóvá. 
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mehetünk tovább a következő fordulóra. 
Ismét egy számot kell megadni, és kez¬ 
dődhet a következő játék. Ha a harmadik 
fordulót is végigjátszottuk, a végered¬ 
mény táblába kerülünk, ahol egy kérdésre 
kell válaszolni: JÁTSZUNK MEG? (I/N). 
Ha ,,N” akkor visszatér a menübe. Ha 
, ,1”, akkor nullázza az összes változó érté¬ 
két, és ismét kezdődik egy újabb három¬ 
fordulós játék. 

Ha a játék folyamán elfogytak a más¬ 
salhangzók a feladványban, mind a kétjá¬ 
tékos 1—1 lehetőséget kap a megfejtésre. 
Természetesen ha valamelyik játékos kita¬ 
lálja a feladványt, a másik játékosnak 
nincs lehetősége. Amennyiben egyik játé¬ 
kos sem találta el a megfejtést, a program 
elárulja és kezdhetjük a következő for¬ 
dulót. 


3. Új adatlemez 
előkészítése 

Választása után a program bekér egy 
új lemezt, és figyelmeztet, hogy a lemez 
formázása következik. Vigyázni kell, ne¬ 
hogy az a lemez legyen benne a meghajtó¬ 
ba, amelyiken a program van, mert letör¬ 
lődik. Ezért az I vagy az N betű megnyo¬ 
másával nyugtázni kell egy kérdést: 
RENDBEN? (I/N). Ha a N billentyűt 
nyomjuk le, akkor visszatérünk a menü¬ 
be. Ellenkező esetben elkezdődik a lemez 
formázása, és ha ez elkészült, a program 
létrehoz a lemezen egy SORSZÁM nevű 
soros file-t, amiben az adattárolás folya¬ 
mán a feladványok számai fognak tárolód¬ 
ni. Miután ez is megvan, visszatérünk a 
menübe. 


4. Program vége 

A programból való kilépés. A prog¬ 
ram a gép memóriájából nem törlődik. 
A program kezelésének folyamata: 

1. Új adatlemez előkészítése. 

Csak az esetben kell választani, ha 
nincs még előkészített adatleme¬ 
zünk. 

2. Új feladványok létrehozása. 

Egy lemezoldalon max. 663 darab 
adatállomány fér el. 

3. Játék. 

Abban az esetben, ha már szerepel 
a lemezen feladvány, választhatjuk 
a játékot elsőnek, nem szükséges 
új adatokat írni a lemezre. 

Hörömpő Ferenc 


O 


O 


Q 


10 

20 

30 

40 

50 

60 

70 

80 

90 


PQKE53280,0:PRINT"D":SOSUB 2970 

1D-UJ FELADVÁNYOK LÉTREHOZÁSA":PRINT"H 
3Q-UJ ADATLEMEZ ELOKESZ1TESE":PRXNTGE 
KEREM VÁLASSZON !" 

THEN 50 

80,2820,3000 


2640, 


o 

1 10 


120 

o 

13.0 
140 

0 

150 

160 


170 

o 

180 

190 

o 

200 

210 


220 

o 

230 

240 


250 

o 

260 


270 

o 

280 

290 

o 

300 
310 


320 

o 

330 

340 

o 

350 

360 

370 

o 

380 

390 

0 

400 

410 

o 

*T .4. v„J 

430 

440 

o 

450 

460 


470 


PQKE53281,0 
PR INT "SÜSÜÉ 

PR INT"CB 
pr INT" BÉKÉI 
GET W*:IF W*=""' 

QN VAL(W$) GOTO 
GOTO 50 

PRINT"nüÜÜS] KEREK EGY ADATLEMEZT 

GET W*:IF W*OCHE$ (13) THEN 90 
CLRsDIM ZE (30) : OF'EN 1,8, 2, "SORSZÁM, S, R" 
J.F SM-0 OR SM=1 THEN 2950 
PRINT"□"CHR*< 8):GQSUB 2290 
INPUT"nüüsin AZ ELSŐ JÁTÉKOS NEVE: fii " 
INPUT "[25IÜ5ISH A MÁSODIK JÁTÉKOS NEVE: fi] ” 
WE=WE+i:FOR 1=1 TO 13:READ ZE(I) 


fiP EJ-JÁTÉK" 
4EJ-PR0GRAM VEGE' 


,RETURN> 


INPUT#1,SM:CLOSE 1 


l A$:PRINT:IF LEN(A$)>10 THEN 130 
:B*:IF LEN<B$)>10 THEN 140: PRINT"m" 


DATA 30, 26, 10,6,, 50,50,40,40,: 




30,: 
ES 


20,20,10:NEXT 
'SM-KOZOTT !”: 


PRINT"fTTSTSISISTST EREK EGY SZAMOT 
IF X<2 OR X>SM THEN 170 
X*=STR*<X):OPEN 1,8,2,X*+",S,R" 

INPUT#!,0$:INPUT#1,CC$:INPUT#1,CS 

CLOSE l:PRlNT"rtUA TUDJA A VÁLASZT,NYOMJA MEG AZ 

pr int MummmiiummwiiimimmmBimmmwniNniB] 1 ': PR int " 

PR INT 

PR INT'_ 

PR INT SÜÜÜÜSE! "CC$: PR I NT "n=MÜÜiiI»M" 


I:RESTORE:S=5427í 
INPUT "teteMs! 


F1 -ET" 

"WE"F0RDUL0" 


; X=0 
GJ"?X 




B$" PONTSZAMAfiJ "sPRINT" 


PR INT 

□" 


A*" PONTSZAMAfiJ" 


III1111II1 1 TI T I 3 11 3 I 11 I I 1 I 3 I 11 I 1 I 






T 


Süüüüüüüüüüüüüsl 

SüüüüSEl 

PRINT 1 nüüÜÜÜÜÜÜS :PRINT 
PR INT" KimnntniBiinwimniiiniiBiiimmi 
pr i nt M«inmniKiiii»iBimmwW>Wüüiil 

C=LEIM ÍC$) : POR 1 = 1 TO C 
D$=" 0-J" 

1F MID*(C*,I,1)=" "THEN D*=" " 

PRINT" SÜÜÜS"fAB <I) ; D$: NEXT I:PRINT 
D=D+1:IF D=1 OR EK=1 THEN 370 

FÓR DA=1 TO 4:FÓR VA=1 TO 100:NEXT VA:HH=100:1F DA=4 THEN HH=167 
POKE S+4,0:POKE S+S,0:POKE S,0 
F'OKE S+24, 15; POKE 5+5, HH: POKE S+4, 

IF D/2=INT(D/2)THEN 390 
GOTO 690_ 

IF KE=1 THEN 1980 
El<=0 

F'R I NT " t3d« IiilKliiI»imBimnWIBliiI«WwIwIÜnl 

GET W*;IF TI$="000005"THEN 480 

IF W*=.I'HEN 480 

IF W$="1"THEN 1060 
IF W$=""THEN 43© 

GOTO 430 


J":PRINT"d" 


53:POKE S+l,ZE(DA):POKE S,37:NEXT DA 


:PRINT"H KÖVETKÉZ 1K 


KEREM PÖRGESSEN!Q 


TI $.-="000000" 


O 


O 


O 


O 


O 


O 


O 


O 


o 


o 


o 


o 


o 


o 
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10 

20-40 

50 

60-70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220-280 

290 

300 

310 

320 

330 

340 

350-360 

370 

380 

390 

400 

410 

420 

430 

440-460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690-990 


A program szerkezete 

Alapszín, keretszín és háttérszín beállítása. Ugrás a 2970-es sorban kezdődő szubrutinra. 

Menüpontok. 

Várakozás egy billentyűre. 

A lenyomott billentyű szerinti elágazások. 

Adatlemez bekérése. 

Várakozás a RETURN billentyűre. 

Változók nullázása, ZE változó dimenzálása, SORSZÁM nevű fiié megnyitása, SM változó beolvassa, és a fiié le¬ 
zárása. 

Vizsgálja SM változó értékét. Ha egyenlő 0-val vagy 1-gyel, elágazik a 2950-es sorba. 

SHIFT+COMMODORE blokkolása, ugrás a 2290-es sorban kezdődő szubrutinba. 

Kéri az első játékos nevét, majd vizsgálja karaktereinek számát. Ha hosszabb mint 10 karakter, akkor újra kéri a 
nevet. 

Ugyan az mint a 130-as sor, csak a második játékosra vonatkozik. 

Eggyel növeli WE változó értékét, ciklus kezdete, beolvasása ZE változó értékeit a 160-as sorból. 

ZE változó értékei, visszatérés a ciklusra, data mutató visszaállítása, SÍD báziscím megadása, X változó értékének 
nullázása. 

Bekér egy számot 2 és SM változó értéke között X változóba. 

Vizsgálat. Ha X értéke kisebb mint kettő, vagy nagyobb mint SM változó, akkor vissza a 170-es sorba. 

X tartalmát átalakítja füzér típusúvá, és betölti X$ változóba. X$ nevű fiié megnyitása. 

Beolvassa az előzőleg megnyitott file-ből C$, CC$ és CS tartalmát. 

Fiié lezárása, képernyő kirajzolásának megkezdése. 

Képernyő felrajzolása. 

C$ füzérváltozó karaktereinek számát betölti C változóba. Ciklus kezdete. 

D$ változó tartalmának megadása. 

Vizsgálja C$ változó szóközeit, és ha talál benne, D$ tartalmát megváltoztatja. 

Négyzetek kirajzolása a képernyőre, visszatérés a ciklusra. 

Eggyel növeli D változó értékét. Vizsgálat: ha D vagy EK változó értéke egyenlő 1-gyel, akkor elágazik a 370-es sorba. 
Ciklus kezdete. Késleltető ciklus. HH változó értékadása. Vizsgálat: ha a ciklusváltozó elérte a4-et, akkor HH értékét 
megváltoztatja. 

Hangok létrehozása. Visszatérés a ciklusra. 

D változó vizsgálata: ha értéke páros, akkor elágazik a 390-es sorba. 

Ugrás a 690-es sorba. 

Kiírja a képernyőre, hogy a második játékos következik. 

Vizsgálat: ha KE értéke egyenlő 1-gyel, elágazik az 1980-as sorba. 

EK változó nullázása. 

Felszólít a pörgetésre. TI$ értékét nullázza (óra). 

Várakozás egy billentyűre. Vizsgálja az eltelt időt. Ha az idő elérte az 5 másodpercet, akkor elágazik a 480-as sorba. 
W$ tartalmának vizsgálata, és e szerinti elágazások. 

Ugrás a 430-as sorba. 

Ugrás az 1450-es sorban kezdődő szubrutinba. Felszólít egy mássalhangzó megadására. TI$ értékét nullázza. 
Várakozás egy billentyűre. 

Vizsgálja TI$ változót. Ha értéke eléri a 15 másodpercet, akkor ugrás a 2500-as sorban kezdődő szubrutinba. 
Vizsgálja TI$ változót. Ha értéke eléri a 25 másodpercet, elágazik a 2540-es sorba. 

Vizsgálat: ha nem ütöttünk le billentyűt, elágazik a 490-es sorba. 

Vizsgálja W$ tartalmának ASC értékét. Ha kisebb mint 65 vagy nagyobb mint 90, akkor elágazik a 490-es sorba. 
Vizsgálat: ha W$ tartalma magánhangzó, akkor ugrás a 330-as sorba. 

TY változó nullázása. 

Ciklus kezdete. 

Vizsgálja a leütött billentyűt. Ha megegyezik a feladvány (C$) valamelyik karakterével, akkor TY változó értéke 
egyenlő 1-gyel. 

Visszatérés a ciklusra. 

Ugrás az 1000-es sorba. 

TY változó értékének vizsgálata. Ha egyenlő 0-val, akkor elágazik a 330-as sorba. 

Ciklus kezdete. 

Vizsgálat: ha W$ tartalma megegyezik a feladvány valamelyik karakterével, akkor ugrás a 650-es sorba. 
Visszatérés a ciklusra. 

Ugrás a 390-es sorba. 

Ugrás a 2570-es sorban kezdődő szubrutinba. B változó értékének növelése Q értékével. 

Kiírja a képernyőre a második játékos nevét és pontszámát. Ugrás az 1930-as sorban kezdődő szubrutinba. 
Vizsgálat: ha BU értéke egyenlő CS értékével, elágazik az 1960-as sorba. 

Ugrás a 630-as sorba. 

Ugyanaz mint a 390—680-as sorok, csak az első játékosra vonatkozik, és az elágazások nem mindenütt ugyanazok. 
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480 GOSUB 1450: PR INT "EJ KEREK EGY MASSALHANGZOTD" : TI$= ,, 000000" 

490 GET W9> 

500 IF TI*>="000015"THEN GOSUB 2500 
510 IF 7IÜ> =' 1 000025"THEN 2540 
520 IF W$=""THEN 490 

530 IF ASC<W*><65 ŰR ASC<W*>>90 THEN 490 

540 IF WÜ>= "E " ORW*= "U " 0RW9>= " I " ORW$ a " O" ORW$=" A" THEN GOTO 330 

550 TY=0 

560 FÜR 1.1 Tű C 

570 IF W*»MID*<C*„1,1)THEN TY-1 

530 NEXT I 

590 GOTO 1000 

600 IF TY —ó THEN 330 

610 FÓR I»1 Tű G 

620 IF W*=MID*<C$,I,1)THEN GOTO 650 

630 NEXT I 

640 GOTO 390 

650 GOSUB 2570:B=B+Q 

660 PRINT 11 rErwTwIwTwTwIwlwTwl ': FRINT Bűi" PONTSZAMAQ "Bs PRINT"n'‘: GOSUB 1930 
670 IF BU--C3 THEN 1960 
680 GOTO 630 

690 PR I NT 1 ' TAB < 10) A*; PR I NT " □ KÖVETKÉZ IK ®" 

700 IF KE"1 THEN 1980 
710 EK=0 

720 PR 1 NT ' C3tem iwIwmiwimBlwIwIiiInimnimwT»lwim KEREM PÖRGESSEN ! n TI$=" 000000 " 

730. TI"000000" 

740 GET W*sIF TI*="000005”THEN 790 

750 IF W$=" "THEN 790 

760 IF W$="!"THEN 1060 

770 IF «*='"'THEN 740 

780 GOTO 740 

790 GOSUB 1450: PRINT"B KEREK EGY MASSALHANGZOTQ" :TI*="000000" 

800 GET Wí 

8.1.0 IF TI$="000015"THEN GOSUB 2500 
82© IF TI$>="000025"THEN 2540 
830 IF W*=""THEN 800 

84O IF ASC í. W$) <65 OR ASC <W$> >90 THEN 800 

850 IF Wí="E"ORW*«"U"ORW*-"I"ORW*="0"ORW*="A"THEN GOTO 330 
860 TY=0 

870 FűR 1=1 TQ C 

880 IF W*=MID*<C», I, DTHEN TY=1 

890 NEXT I 

900 G0T0 100 0 

910 IF TY=0 THEN 330 

920 FÓR 1=1 TG C 

930 IF Wí)s=MID$ (Cili, I, DTHEN GOTO 960 

940 NEXT I 

950 GOTO 690 

960 GOSUB 2570:A=A+Q 

970 PRINT"ndrtuMrtuM" s PRINT A$" RONTSZAMAB "As PRINT"s GOSUB 1930 
980 IF BU=CS THEN 1960 
990 GOTO 940 

1000 J»J+1:MU*MU+1:PI=0:WW*=WW«h-W* sIF J»1 THEN 1040 
1010 FÓR l<= 1 Tű J-l 
1020 IF W*=M ID % ( WW$, K, I) THEN PI = 1 
1.030 NEXT K: IF PI = 1 THEN 1750 

1040 PR I NT " t PR INTT AB (MU+MU) W$" , "s IF D/2=INT <D/2) THEN 600 

1050 IF D/2<>INT(D/2)THEN 910 

1060 PRINT"' * INPUT M*s PRINT"D" s IF LEN (M*) >36 THEN 1060 
1070 IF M*=C* THEN 1120 

1080 PRINT 1 SAJNOS NEM JO": GOSUB 2560 

1090 M*= M " SPRINT* aÍEEEEEEEEEl" SPRINT" •'? 

1100 pRINT" 

1.1.10 PR INT" " ; : KK=Ö: KA=0: GOTO 330 

1120 FÓR DA=1 TQ C 

1.1.30 FOKÉ S+4, 0: PŰKE 5+5,0: FOKÉ 3,0 

1140 FOKÉ S+24,15: POKE S+5,40; FOKÉ S+4,33: F'OKE S+1,60: FOKÉ S, 37 
1.150 PRINT"eaEtüIíilül 'TAB (PA) MID$ (C$. PA. 1) : NEXT DA: GOSUB 2560 

1160 PRINT"mBPW" 
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1000 J és MU változó értékének növelése eggyel, Pl változónullázása, és W$ változó tartalmának betöltése WW$ változó¬ 

ba. Vizsgálat: ha J értéke egyenlő 1-gyel, akkor elágazik az 1040-es sorba. 

1010 Ciklus kezdete. 

1020 Vizsgálat: ha W$ tartalma megegyezik WW$ valamelyik karakterével, akkor Pl értéke egyenlő 1-gyel. 

1030 Visszatérés a ciklusra. Pl értékének vizsgálata: ha egyenlő 1-gyel, akkor elágazik az 1750-es sorba. 

1040 Kiírja a képernyőre W$ változó tartalmát MU pozícióba (tabulátor). Vizsgálat: ha D értéke páratlan, akkor elágazik 

a 600-es sorba. 

1050 Vizsgálat: ha D értéke páratlan, akkor elágazik a 910-es sorba. 

1060 Kéri a megfejtést M$ változóba. Vizsgálat: ha M$ karaktereinek száma nagyobb mint 36, akkor vissza a sor elejére. 

1070 Vizsgálat: ha M$ tartalma megegyezik C$ tartalmával, akkor elágazik az 1120-as sorba. 

1080 Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

1090 M$ tartalmának törlése. Üzenet letörlése a képernyőről. 

1100 Üzenet letörlése a képernyőről. 

1110 Üzenet letörlése a képernyőről. KK és KA változó nullázása, ugrás a 330-as sorba. 

1120 Ciklus kezdete. 

1130— 1140 Hangok létrehozása. 

1150 Kiírja a képernyőre a feladvány karaktereit egyesével. 

Visszatérés a ciklusra. Ugrás a 2560-as sorban kezdődő szubrutinba. 

1160 Képernyő tisztítása. 

1170 Vizsgálat: ha D értéke páros, akkor YY$ egyenlő B$ tartalmával. 

1180 Vizsgálat: ha D értéke páratlan, akkor YY$ egyenlő A$ tartalmával. 

1190 Vizsgálat: ha D értéke páros, akkor YY egyenlő B értékével. 

1200 Vizsgálat: ha D értéke páratlan, akkor YY egyenlő A értékével. 

1210 Kiírja a képernyőre a forduló számát és a nyertes nevét. 

1220 Kiírja a képernyőre a nyertes pontszámát. 

1230 Üzenet a képernyőre. 

1240 Vizsgálat: ha D értéke páros, akkor KK értéke egyenlő B értékével. 

1250 Vizsgálat: ha D értéke páratlan, akkor KA értéke egyenlő A értékével. 

1260 FF változó növelése KA változóval. FA változó növelése KK változóval. 

1270 Kiírja az első játékos nevét és összpontszámát. 

1280 Kiírja a második játékos nevét és összpontszámát. 

1290 Üzenet a képernyőre. 

1300 Várakozás az F7-es billentyűre. 

1310 WE változó vizsgálata: ha értéke egyenlő 3-al, elágazik a 2150-es sorba. 

1320 A, B, C, J, I, K, KK, KA, BU, WW$, KE és MU váltakozók törlése. Ugrás a 150-es sorba. 

1330 CSŐD felirat a képernyőre, EK változó nullázása. 

1340 Vizsgálat: ha D értéke páros és B egyenlő nullával, akkor elágazás az 1430-as sorba. 

1350 Vizsgálat: ha D értéke páratlan és A egyenlő nullával, akkor elágazás az 1430-as sorba. 

1360 Ugrás a 2600-as sorban kezdődő szubrutinba. 

1370 Vizsgálat: ha D értéke páros, akkor elágazás az 1410-es sorba. 

1380 Vizsgálat: ha D értéke páratlan, akkor elágazás az 1390-es sorba. 

1390 A értékének nullázása. Az első játékos pontszámának törlése a képernyőről. EK változó egyenlő 1-gyel. 

1400 Ugrás a 330-as sorba. 

1410 B értékének nullázása. A második játékos pontszámának törlése a képernyőről. EK változó egyenlő 1-gyel. 

1420 Ugrás a 330-as sorba. 

1430 Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

1440 Üzenet letörlése. Ugrás a 330-as sorba. 

1450 Pörgetés alprogram kezdete. Véletlenszámot generál 1 és 15 között, majd betölti U változóba. 

1460—1600 U változó értékét vizsgálja, és ettől függően elágazik, illetve értéket ad Q változónak. 

1610 A pörgetett pontszám helyének letörlése a képernyőről. 

1620 A pörgetett pontszám kiírása a képernyőre. 

1630 Vizsgálat: ha U értéke egyenlő 11-el, elágazik az 1670-es sorba. 

1640 Vizsgálat: ha U értéke egyenlő 10-el, elágazik az 1690-es sorba. 

1650 Vizsgálat: ha U értéke egyenlő 8-cal, elágazik az 1710-es sorba. 

1660 Visszatérés a főprogramba. 

1670—1740 Szubrutinok. Üzenetek a képernyőre, visszatérés a főprogramba. 

1750 Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

1760 Törli az üzenetet a képernyőről. MU értékét 1-gyel csökkenti. Ugrás a 330-as sorba. 

1770 FELE felirat kiírása a képernyőre. 

1780 Vizsgálat: ha D értéke páros és B egyenlő nullával, akkor elágazás az 1910-es sorba. 

1790 Vizsgálat: ha D értéke páratlan és A egyenlő nullával, akkor elágazás az 1910-es sorba. 

1800 Ugrás a 2600-as sorban kezdődő szubrutinba. 

1810 Vizsgálat: ha D értéke páros, akkor elágazás az 1870-es sorba. 

1820 Vizsgálat: ha D értéke páratlan, akkor elágazás az 1830-as sorba. 
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1340 
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1390 
1 400 
1410 
1420 
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1440 
1450 


ÍF 
IF 
1F 
IF 


A " WE " .. FORDULD Tű " Y Y$ " GJ NYERTED" a PR I NT 
•' YY " fiPONTTAL " s PR X NT " ®i" 

PRINTSPRINT 


0/ 2=INT(D/2)THEN YY*=B* 

D/2<>INT(D/2)THEN YY*»A* 

D/2=INT( D /2)THEN YY=B 
D / 2 < > INT (D / 2) V H EN Y Y = A 
PR INT GJ 
PRINT 8 

PRINT-D A VETÉLKEDŐ ALLASAs 
IF D/2=INT <D/2) THEN KK==B 
ÍF 0/2-../INT (D/2) THEN KA=A 
F'F “FF +K.A:: FA=FA+KK 

PR INT-ja " A*”n PONTSZAMA"FFs PR INT 
PR I NT 11 G3 "B*"D PONTS Z AM A"F A 

PRINT"®?®® TOVÁBB F7" 

GET WAísIF WA*<>"1"THEN 1300 
IF WE—3 THEN 2150 

A-tís B=©s C.0s J=0s 1=0 8 K=0: KK=0: KA=0s BU=0 

p R INT” i=mi«imnimwiwmimm«®lii®imw »Étt»>HiP>Hi»Éi>iiii 

IF 0/2=INT(D/2)AMD B=0 THEN 1430 
IF D/2--/ INT (D/2) AND A=0 THEN 1430 
GOSUB 2600 

IF D/2-INV(D/2)THEN 1410 

IF D/2 < I NT (D/2) THEN 1390 

A»0: PR I NT "E^EEEEEl" SPRINT A*" PONTSZAMA 

GOTO 330 

8=0: PR INT " nriwMwIiifrlwgW s PRINT B*" PONTSZAMA 
GOTO 330 


WW*= 


.. KE=0: l v lü=0 s GOTO 150 

IIIIBlilHliWll CSQDQ " 


i EK=0 


" :EK=1 


í- R IN T 
PRINT“Q 

U= INT (15*RND (1) H-.1 


NEM SOK VESZTESÉG ÉRT 
"s GOTO 


■D' 

;3© 


; EK= 1 


; GOSUB 2560 



1460 

IF 

U= .1. THEN 

1330 

o 

1470 

IF 

U--2 THEN 

0=50 


1 480 

IF 

U=3 THEN 

0= 1 00 

o 

1 490 

IF 

U=4 THEN 

1770 


1500 

IF 

U=5 THEN 

0=200 

o 

1510 

IF 

U=6 THEN 

0=300 

1520 

IF 

U.7 THEN 

0 = 400 


1530 

IF 

U=B THEN 

0=20 


1540 

IF 

U=9 THEN 

0=1000 

vJ 

1550 

IF 

U=10THEN 

0=1500 


1560 

IF 

1J=11THEIM 

0=10 

o 

1570 

IF 

U=12THEN 

1 770 


1580 

IF 

U=13THEN 

0=450 

o 

1590 

IF 

U=14THEN 

Q=350 


1600 

IF 

U=15THEN 

0=150 


1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
17 60 
1770 
1786 
1 790 
1800 
.1.810 
1820 
1830 
1840 
1850 
1860 


F R X NT a?®l?l?l?l?I?®®®UüL»®®l?l?ll 

PRINT [ 

IF U=U THEN 1670 
IF U=10 THEN 1690 
IF U=8 THEN 1710 
RETURN 


fim 


J033JJJJ 


"Q 


PR I NT a?®l?l?l?®l?l?l?L''l"l?E 

PR INT" □ 

PR INT 
PRINT"D 

PR I NT " a?®®®?®®?®®?®!] 

PRINT"n 
PRINT"®®0" 

RETURN 

pr i mt 1 MiummmmmmmMiiiBinKí 

PRINT"n 

P RINT"§®®®®®®®®®®®®®®®® 

IF D/2=INT(D/2)AND B.0 THEN 1910 

IP D/20INT (D/2) AMD A=0 THEN 1910 
GOSUB 2600 

IF D/ 2- INT(D/2)THEN 1870 
IF D/2<>INT(D/2)THEN 1830 

A«A/2s PRINT" Dl®®®®®®" : PRINT A*" PONTSZAMA 
PRINT"D!®®®®®®' SPRINT A*” PONTSZAMAB "A 
EK=1 

GOTO 330 


SOK KICSI SOKRA MEGY ! D' : GOSUB 2560 
" - PR IN T " ü®" * RETURN 

MEGFOGTAD AZ ISTEN LÁBÁT ! D' : GOSUB 2560 
"SPRINT"®®®":RETURN 
SAJNOS CSAK ENNYI VOLT 0“:GOSUB 2560 


EZ MAR VOLTD's GOSUB 1 
";MU=MU—1s GOTO 330 
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A értékének felezése. Az első játékos pontszámának letörlése a képernyőről. 

Az első játékos pontszámának kiírása a képernyőre. 

EK változó értéke egyenlő 1-gyel. 

Ugrás a 330-as sorba. 

Ugyanaz mint az 1830—1860-as sorok, csak a második játékosra vonatkozik. 

Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

Üzenet törlése. Ugrás a 330-as sorba. 

Szubrutin. BU változó értékének növelése 1-gyel. Visszatérés a főprogramba. 

Vizsgálat: ha D értéke páros, akkor elágazás a 680-as sorba. 

Vizsgálat: ha D értéke páratlan, akkor elágazás a 990-es sorba. 

Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

Üzenet törlése a képernyőről. 

KE változó értékének növelése 1-gyel. 

Üzenet a képernyőre. 

Cursor vissza, cursor le. 

Kéri a megfejtést M$ változóba. 

Vizsgálat: ha M$ tartalma egyenlő C$ tartalmával, akkor elágazás az 1120-as sorba. 

Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

M$ tartalmának törlése. 

Vizsgálat: ha KE értéke egyenlő 2-vel, elágazás a 2100-as sorba. 

Az előzőleg M$ változóba megadott szöveg törlése a képernyőről. 

Ugrás a 330-as sorba. 

Üzenet a képernyőre. 

A feladvány kiírása a képernyőre. 

Késleltető ciklus. 

Vizsgálat: ha WE értéke egyenlő 3-mal, akkor elágazás a 2150-es sorba. 

A, B, C, J, I, K, KK, KA, BU, WW$, KE és MU változók törlése. Ugrás a 150-es sorba. 

Üzenet a képernyőre. 

Vizsgálat: ha FF értéke nagyobb mint FA értéke, akkor KI$ egyenlő A$ tartalmával. 

Vizsgálat: ha FF értéke kisebb mint FA értéke, akkor KI$ egyenlő B$ tartalmával. 

Vizsgálat: ha FF értéke nagyobb mint FA értéke, akkor KI egyenlő FF értékével. 

Vizsgálat: ha FF értéke kisebb mint FA értéke, akkor KI egyenlő FA értékével. 

Kiírja a képernyőre annak a játékosnak a nevét, aki az összesítésben nyert. 

Kiírja a képernyőre a nyerő játékos pontszámát. 

Üzenet a képernyőre. 

Várakozás egy billentyűre. 

Vizsgálat: ha az N billentyűt nyomtuk le, elágazás a 10-es sorba. 

Vizsgálat: ha az I billentyűt nyomtuk le, elágazás a 100-as sorba. 

Ugrás a 2250-es sorba. 

Szubrutin. Váltás kisbetűs jelkészletre. A játékszabály leírása. 

Várakozás az F7-es billentyűre. 

Üzenet a képernyőre. Váltás nagybetűs jelkészletre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

Visszatérés a főprogramba. 

Szubrutin. Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

Üzenet letörlése, vissza a főprogramba. 

Üzenet a képernyőre. Ugrás a 2560-as sorban kezdődő szubrutinba. 

Üzenet letörlése. Ugrás a 330-as sorba. 

Szubrutin. Késleltető ciklus. Visszatérés a főprogramba. 

Szubrutin. Hangok létrehozása. 

Kiírja a négyzethálóra, megfelelő helyre a kitalált mássalhangzót. Visszatérés a főprogramba. 

Szubrutin. Hangok létrehozása. Akkor működik, ha CSŐD-öt vagy FELE-zőt pörgetünk. 

Visszatérés a főprogramba. 

Megnyitja a SORSZÁM nevű file-t, beolvassa SM változó értékét, majd lezárja a file-t. Vizsgálat: ha SM értéke 
egyenlő 0-val, elágazik a 2940-es sorba. 

SM értékét növeli 1-gyel. SM változó értékét átalakítja füzérváltozóvá és betölti X$-ba. 

Vizsgálat: ha SM értéke nagyobb vagy egyenlő 665-nél, akkor elágazik a 2930-as sorba. 

Kéri a feladványt C$ változóba. Vizsgálat: ha C$ karaktereinek száma nagyobb mint 36, akkor visszamegy a sor 
elejére. 

Kéri a feladvány típusát CC$ változóba. 

Kéri a feladványban szereplő mássalhangzók számát CS változóba. Üzenet a képernyőre. 

Várakozás egy billentyűre. 

Vizsgálat: a leütött billentyű az I, akkor elágazik a 2740-es sorba. 

Vizsgálat: ha a leütött billentyű az N, akkor elágazik a 2650-es sorba. 

Ugrás a 2700-as sorba. 
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SPRINT B 9 >" PONTSZAMA 
SPRINT B*" PONTBZAMAfl "E 


FELEZNEM HA VOLNA MIT ! Q" 8 BOSÜB 2560 
"ssora 330 


NINCS TÖBB MASSALHANÖZQQ" :GOSUB 2560 


B--B/ 2 : PRI NT ’ 

PRINT" 

EK* 1 

GOTO 330 
PR I NT 
PR 1 NT"Q 
BU=BU+ 1 :RETURN 
IF D /2 = INT (D/ 2 ) THEN 680 
IF D/ 20 INT (D/ 2 ) THEN 990 
PR INT 
PRINT"□ 

KE--KE+1 
PRINT"g 
PR INT 

INPUT l v hi> 8 PR INT "EJ" 

IF M*=C* THEN 1120 
PR I NT 11 
.. 

IF KE *2 THEN 2100 
PR I NT " s PR 1 NT 

PR 1 NT" 

PRINT" 

GOTO 330 

PRINT"Cg®B®Bl SAJNOS EGYIKÜK SEM TUDTA":PRINTiPRINT" 


KEREM A MESFELYTEST 


SAJNOS NEM JO" 8 GOSUB 2560 


’i 


; 


A HELYES VAL 


PRINT s PRINTs PRINT: PRINT"GJ 
FÓR VA =1 TO 20001 NEXT vA 
IF WE -3 THEN 2150 

A“ 08 B= 0 :C= 0 s J= 0 :I= 0 sK* 0 :KK* 0 :KA= 0 :BU =0 


A MEGFELYTESs " : PRINT" J 5 " • PRINT C* 


WW$=""s KE= 0 :MU= 0 :GOTO 150 


PR INT' 
PRINT' 

IF ff; 

IF FF- 
IF ff: 


s PR INT"B 


A JÁTÉK VEGEREDMENYE' 


FATHÉN KI*=AS 
FATHÉN KI*=B* 

FATHEN KI-FF 
KI =F A 

ffl A MAI JÁTÉKOTD "KI*"E NYERTE' 

"KI 1 gpONTTALH" :PRINTsPRINT 
GRATULÁLOK" 


IF FF-FATHÉN 
PR J. N T s PR . 1 . NT 
PRINT E 
PRINT" 


iPRINT 


:PRINTsPRINTsPRINT" 
GET W*sIF W*=""THEN 
IF W*="N"THEN 10 
IF WS>=" I "THEN 100 
GOTO 2250 


JATISZUNK MEG 


(I/N) 


Z50 


PR ] N1 ‘ '■ 

PRINT" 

PR I NT" 

F RIN T " 

PR I NT" 

F RIN T ” 

PR I NT" 
PRINT" 
PRINT" 

PR I NT" 
PRINT" 

PRINT" 

PR INT" 
PRINT" 

PRINT" 

PR 1N1"" 

PRINT" 

F RI NT 1 5 
GET POísIF 
PRINT" 
RETURN 
F Rí INT" 
PRINT 
RÉM s 
RÉM: 

PRINT 
PRINT 


B" s PRINT"B '*I #♦* I *L IQ"CHR* ( 14 ) 

s --—n» 

* JÁTÉKBAN KÉT JÁTÉKOS VEHET RESZT." 
t SZABÁLYOK MEGEGYEZNEK A TELEVÍZIÓ" 

SZERENCSEKEREK JATEKANAK SZABÁLYAIVAL." 

* PROGRAM ELŐSZÓR A KEI JÁTÉKOS NEVET" 

KÉRI,MAJD EGY SZAMOT..INDEN BEGEPELT" 

NÉV EB SZÁM UTAM A ,w> BILLENTYŰT" 

KELL LENYOMNI,* JÁTÉK FOLYAMAIN MINDÉIN" 

EGYES FORDULD ELÜTI EGY SZAMOT KÉR A" 

GEP. 0 ZT A SZAMOT AMI MAR EGYSZER SZE-" 

REPELT INÉ ADJUK MEG, MERT AKKOR OLYAN" 

FELADVÁNYT KAPUINK, AMI MAR EGYSZER VOLT."; 

.GY JÁTÉK 3 FORDULÓBÓL ALL. " s PRINT'"i“ 

I ", LLF'V'I I ^ - " 8 PRIINT 
TQRGETES " s PR I NT' 

-1 "SPRINT 

II.•* v~l *♦ —7—ET. " 

2470 

SOK SZERENCSET! Q" sPRINTCHR*( 142 )sGOSUB 


W r 

.I ™” 


* i ".Ll_ " 
l_ II 


PQH> > 


1 I . 8 
: 

- rí 

]" THEN 


• • • 


ELALUDTÁL 


# « 


' □ 


1 SPRINT' 


1 :GOSUB 1 
1 :RETURN 


£560 


560 


AZ ALVÁSÉRT 


MEGBÜNTETLEK 

"SPRINT"® 


’:GOSUB 
2 " : GOTO 


2560 

330 


Qs. "34 
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Megnyitja az X$ nevű file-t írásra. 

Beolvassa a file-be C$, CC$ és CS változó tartalmát, majd lezárja a file-t. 

Üzenet a képernyőre. 

Várakozás egy billentyűre. 

Vizsgálat: ha a lenyomott billentyű I, elágazás a 2650-es sorba. 

Vizsgálat: ha a lenyomott billentyű N, elágazik a 2810-es sorba. 

Ugrás a 2770-es sorba. 

Megnyitja a SORSZÁM nevű file-t írásra, beolvassa SM változó értékét, majd lezárja a file-t. Ugrás a 10-es sorba. 
Üzenetek a képernyőre. 

Várakozás egy billentyűre. 

Vizsgálat: ha a lenyomott billentyű I, elágazik a 2900-as sorba. 

Vizsgálat: ha a lenyomott billentyű N, elágazik a 10-es sorba. 

Ugrás a 2860-as sorba. 

Üzenet a képernyőre. 

A lemez megformázása. SM egyenlő 1-gyel. SORSZÁM nevű fiié létrehozása. 

Beolvassa a file-be SM értékét, majd lezárja a file-t. Ugrás a 10-es sorba. 

Üzenet a képernyőre. SM értékét 1-gyel csökkenti. Ugrás a 2560-as sorban kezdődő szubrutinba. Ugrás a 2810-es 
sorba. 

Üzenet a képernyőre. Ugrás a 2960-as sorba. 

Üzenet a képernyőre. 

A lemez INCIALIZÁLÁSA. Ugrás a 2560-as sorban kezdődő szubrutinba. Ugrás a 10-es sorba. 

Szubrutin. A menü keretének felrajzolása. Vissza a főprogramba. 

Képernyő tisztítása. Az összes változó törlése. Kilépés a programból. 
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, 0s F'OKE 3,0: FÓR VA»1 TO 50! NE XT 
8+4,33: F'OKE S+1,80: F'OKE S, 37 


VA 


DA 


FÓR 1=1 TO 1500 aNEXT I:RETURN 
PR INT " Hűiül " s F'OKE S +4 , 0 s FOKÉ 3+5 , 

F'OKE S+ 24 , 15 : F OKÉ 8 + 5 , 100 : F'OKE 
PRINTTAB(X)MID®<C$, 1 , 1 ):RETURN 
FÓR DA ==5 TO 13 

FÓR VA --1 TO 50 : NEXT VA:HH= 100 :FOKÉ 8 + 4 , 0 : FOKÉ 3 + 5 , 0 : F'OKE 8,0 
FOKÉ S+ 24 , 15 : F'OKE 8 + 5 , HH: F'OKE S+ 4 , 33 : FOKÉ 8 + 1 , ZE (DA) : FOKÉ S, 37 : NEXT 
RETURN 

FRINT"□" :OFEN 1 ,B, 2 ,"SORSZÁM,S,E": INPUT#!,SM:CLQSE 1 :IF SM=@ THEN 2940 
3 M= 5 M+ÍsX*=SÍR*(SM) 

IF SM>=ö 65 THEN 2930 

PRÍNf " 01111 ” : INPUT "FELADVÁNY" 5 C$: PRÍNT: IP LEN (C*) > 36 TMEN 2670 
I NF'UT " TI PÚBA " : CL®: PR I NT 

ÍNFŰT "MASSALHANGZQK SZAMA"; CS: PRINT' > fgBp FELÍRHATOM (I/N) " 

GET W*:IF W*=""THEN 2700 
IF W*="I"THEN 2740 
IF W*="N"THEN 2650 
GOTO 2700 

OF'EN 1 , 8 , 2 , " 00 : "+X*+" , S,W" 

PRINT# 1 , C*: F'R I NTtti , CCÍ: PR INT# 1 , CS: CLOSE . 1 . 

FRI NT "@JU VAN MEG ? (I/N)" 

GET W$:IF W*=""THEN 2770 

IF W*."I"THEN 2650 

IF W*="N"THEN 2810 
GOTO 2770 

OFEN 1 , 8 , 2 , "( 2 : SORSZÁM, 3 , W" : PRINTttl, SM: CLOSE 1 : GOTO 10 
PRINT"n?®! KEREM HELYEZZEN A MEGHAJTÓBA" 

FRINT"® EGY UJ LEMEZT !":PRINT"BE® FIGYELEM !!!Q" 

PRlNt"iH A LEMEZEN LEVŐ ÖSSZES ADAT TQRLODIKQ" 

F'R I NT" füIüT üIBl RENDBEN ? (I/N)" 

GET W*sIF W*=""THEN 2860 
IF W*="‘ I "THEN 2900 
IF W*="N"THEN 10 
GOTO 2860 
F'R í HT " dRlüI?!*! 

OPEN 15 , 8 , 15 , 

PRINT# 1 ,SM:CLOSE 
F'R INT " OM?!?!?!?! 

PR I NT " nwInTnl 


KIS TÜRELMET KEREK 


N: SZER. I<. ADATOT 
1:GOTO 10 

A LEMEZ 
A LEMEZ NINCS 


0O " : CLOSE 15: SM= 1: OF'EN 1,8,2, " SORSZAM, S, W" 


MEGTELT 
ELOKESZIT VE 


: SM = 


SM-1:GOSUB 
:GOTO 2960 


2560:GOTO 2810 


print" nana a 

OF'EN 1,8,15, 

F'RXNT"n...— 

PRI NT" I 

PRINT"L____ 

PRINT" JJ': CL..R: EMD 


LEMEZEN NEM SZEREPELNEK FELADVÁNYOK 
I":CLOSE 1:GOSUB 2560:GOTO 10 


I" ; : FÓR 1 = 1 
I" ; : NEXT I 
J" :RETURN 


TO 9 


O 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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C-64 bővítések 

FINAL III. CARTRIDGE C-64-HEZ (2 . részt 


Előző számunkban megkezdtük a FINAL CARTRIDGE III. is¬ 
mertetését. Most rátérünk használatának részletes bemutatására. 

Üzembehelyezés 

A FINAL CARTRIDGE III csatlakoztatása 

Mielőtt a modult a C-64 vagy a C-128 bővítő portjába csatla¬ 
koztatja, feltétlen kapcsolja ki a számítógépet, és az összes peri¬ 
fériát. Ezután csatlakoztassa a modult címkével felfele. 


A FC-III használata C-128 gépen 

Ha a modul C-128 géphez van csatlakoztatva, a számítógép 
C-64-es üzemmódban jelentkezik be. Ha 128-as, vagy CP/M 
üzemmódban kíván dolgozni, akkor a modult ki kell húznia a 
bővítő portból. Előtte azonban feltétlenül kapcsolja ki a gépet. 

Nyomtató csatlakoztatása 

Amennyiben CENTRONICS (párhuzamos) nyomtatót kí¬ 
ván alkalmazni, kösse össze a gép USER portját és a nyomtatót 
egy megfelelő kábellel. 

A számítógép bekapcsolása 

Miután minden perifériát és a modult is a helyére csatlakoz¬ 
tatta, kapcsolja be a perifériákat és a gépet a szokásos módon. 
A képernyőn nem a szokásos bejelentkezési kép fog megjelenni, 
hanem egy menülista és egy nyíl. Ön most az íróasztal (DESK¬ 
TOP) funkcióban találja magát! Ha a bekapcsoláskor Ön inkább 
a BASIC funkciót szeretné használni, akkor a bekapcsolást le¬ 
nyomott RUN/STOP gomb mellett végezze. 

Ha a bekapcsoláskor nem kapja meg a bejelentkezési képet, 
a RÉSÉT gomb megnyomásával ellenőrizze, hogy megfelelően 
csatlakoztatta-e a modult. 


Funkcióbillentyűk használata BASIC üzemmódban 

A funkcióbillentyűkre a leggyakrabban használt utasítások 
vannak kihelyezve: 

FI = LIST Kilistáz egy BASIC programot. 

F2 = MONITORA gépi kódú monitort hívja. 

F3 = RUN Elindít egy BASIC programot. 

F4 = OLD Egy NEW-val vagy RESET-tel törölt prog¬ 

ramot aktivizál. 

F5 = DLOAD Betölt lemezről egy programot. 

F6 = DSAVE Kiment lemezre egy programot. 

F7 = DOS * $ Direktory-t listáz, a prg. területet nem írja 

át. 

F8 = DOS Disk parancsok küldése. 

Ezeknek a funkcióbillentyűknek a használatát (a LIST és a 
RUN kivételével) a későbbiekben még részletesen ismertetjük. 

A FINAL CARTRIDGE III ki- és bekapcsolása 
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A FCIII software-ből is kikapcsolható, ha Ön eredeti C-64 
üzemmódban kíván dolgozni. Ehhez nem szükséges kihúzni a 
modult a bővítő portból. A kikapcsoláshoz a KILL utasítást 
használja, ha a gép READY státuszban van. A SYS 64738 beírá¬ 
sa is kikapcsolja a modult. A visszakapcsolás akár a RÉSÉT, 
akár a FREEZER gomb megnyomásával lehetséges. A követke¬ 
zőkben mindkét mód ismertetésre kerül. 

A RÉSÉT és a FREEZER billentyű 

A FC III hátoldalán két nyomógomb van elhelyezve. 

Hátul jobbra a RÉSÉT nyomógomb. 

Hátul balra a FREEZER nyomógomb. 

A RÉSÉT billentyű a gépet minden helyzetből alaphelyzet¬ 
be hozza. Ezzel egyidőben a modul aktivizálódik, ha korábban 
a KILL utasítással ki lett volna kapcsolva. 

A FREEZER (fagyasztó) üzemmód 

Csak olyan programokra érvényes, melynek változói külső 
RAM nélkül is eltárolhatok. 

A modul lehetővé teszi a beépített fagyasztó funkcióval, 
hogy majdnem minden programról amit Ön lemezről, vagy ka¬ 
zettáról töltött be, másolatot tudjon készíteni. Ez védett program 
esetében is igaz! Ügyeljen arra, hogy a copyright-tal védett prog¬ 
ramokat csak saját céljaira szabad lemásolnia! A fagyasztót tilos 
illegális másolásra felhasználni! 

A fagyasztó gomb megnyomásakor a gép pillanatnyi állapo¬ 
ta rögzítődik, és ezt az állapotot tudja Ön disk-re, vagy kazettára 
kimenteni úgy, hogy a későbbiek során az bármikor visszatölthe- 
tő lesz. 

A fagyasztás pillanatában a képernyőn látható állapotot 
nagyfelbontású grafikával nyomtatóra is tudja másolni. Ha Ön 
pl. a kalandjátékban egy bizonyos pontig előre tudott jutni, ki¬ 
mentheti ezt az állapotot, és legközelebb ott folytathatja, ahol 
abbahagyta. 


Ablaktechnika (ablakok és menük) 

A FINAL CARTRIDGE III óriási lehetőségeket nyújt a fel¬ 
használó számára az ablak- és menütechnika alkalmazásával. 

Miután nem minden felhasználó ismeri ezt az új rendszert, 
ezért a továbbiakban részletesen kitérünk ennek ismertetésére. 

A mutató (nyíl) 

A kis nyíl, amelyet a képernyőn látunk, arra szolgál, hogy 
a lehetséges funkciókat a nyíllal történő „rámutatással” elérjük. 

A joystick vagy az egér mozgatásával tudjuk a nyilat a meg¬ 
felelő helyre mozgatni. 
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A mozgatás a billentyűk segítségével is lehetséges. A billen¬ 
tyűk kiosztása a következő: 

FI = fel F3 = le F5 = balra F7 = jobbra 

A tűzgombot a C= billentyű helyettesíti. 

Jóllehet a FCIII mindkét portot ellenőrizni tudja, azt ajánl¬ 
juk, hogy a 2. portot használja, amely erre a célra gyárilag ki 
van választva. 

Sajnos előfordulhat, hogy egér csatlakoztatásakor a billen¬ 
tyűzet nem használható. Ez a jelenség az egér hardware hibájára 
utal, és kiküszöbölni csak az egér kiiktatásával lehet. 

A PREFERENCES menüpont (1. köv. old.) kiválasztásával 
az abban leírtak szerint a nyíl színe megváltoztatható. 

Ki választás ,, gombnyomással ” 

A FC III legtöbb utasítása a nyíl megfelelő helyre állításával 
elérhető. Mozgatás közben a tűzgomb (vagy aC= billentyű) le¬ 
gyen megnyomva. A tűzgomb elengedésére aktivizálódik az 
utasítás. 

Menük 

A legtöbb funkció menükben van elhelyezve, és ezekkel vá¬ 
laszthatunk. A menülista a képernyő felső részén látható: 

INFO SYSTEM PROJECT UTILITIES CLOCK 

Ahhoz, hogy a menülista almenüit megkaphassuk, benyo¬ 
mott tűzgombbal mozgassuk a nyilat a főmenüben. 

A kívánt almenübe úgy juthatunk, hogy a nyilat a megfelelő 
almenülistában a kívánt helyre visszük, és ott a tűzgombot elen¬ 
gedjük. 

Utasítások és parancsok 

A főmenüben kétféle jellegű almenük vannak: 

Az utasításokat a gép azonnal végrehajtja, amint a tűzgom¬ 
bot elengedjük. Ilyen pl. a PROJECT menüben a NOTEPAD al¬ 
menü, amelynek kiválasztásakor a FC III automatikusan a szö¬ 
vegszerkesztő üzemmódba vált. 

Másrészt vannak az úgynevezett opciók (OPTIONS), ame¬ 
lyek addig maradnak aktívak, amíg egy másikat ki nem adunk. 
Ilyen pl. az írásmód a NOTEPAD funkcióban. A kiválasztott op¬ 
ció aktivizálását a mellette megjelenő „pipa” jelzi. 

Ablak 

Ha a megfelelő utasítást kiválasztja, (pl. a PREFEREN- 
CES-t az UTILITIES menüből) akkor a képernyőn meg fog je¬ 
lenni egy ablak, amelyben további beállítási lehetőségekre van 
mód. 

Önnek lehetősége van arra, hogy egynél több ablakot is 
megnyisson, de az ablakok közül mindig csak egy aktív. 

Ablakszimbólumok 

Az ablakszimbólumok segítségével lehetséges az ablakok 
méretét, vagy azok tartalmát megváltoztatni, az ablakot lezárni, 
ill. magát az ablakot eltüntetni a képernyőről. 

Egy ablak esetében a következő szimbólumok fordulhatnak 
elő: 

Balra fent van a zárszimbólum. Ezzel tüntethető el az ablak 
a képernyőről. 

Jobbra fent látható egy dupla négyzet egymás felett. Ez az 
ún. előtér-háttér váltó. Próbálja ki! 

Az ablak neve mellett van egy „kisablak”. Ha erre visszük 
a nyilat és megnyomjuk a tűzgombot, a joystick mozgatásával az 
ablakot áthelyezhetjük a képernyő tetszőleges helyére. 

Az ablakok tartalmazhatnak minden szimbólumot, azok kö¬ 
zül néhányat, vagy egyet sem. 

Különleges esetben az ablak tartalmazhat speciális szimbó¬ 


lumokat is. Pl. a CALCULATOR, amelyben minden nyomó¬ 
gomb egy önálló szimbólum. Ha olyan funkciót használunk, 
ahol szöveget kell az ablakba beírnunk, (pl. disk ID vagy NÉV) 
akkor a text beviteli jelet kell használnunk. Ha ezt aktivizálni 
akarjuk vigyük oda a nyilat és nyomjuk meg a tűzgombot, majd 
írjuk be a kívánt szöveget. A szövegírás befejezésére a következő 
lehetőségek vannak: 

— nyomjon RETURN-t, vagy 

— vigye ki a nyilat a mezőből és nyomja meg a tűzgombot, 
vagy 

— válasszon egy új utasítást, pl . a DO végrehajtási utasítást. 
A kommunikációs ablak 

A kommunikációs ablak minden más ablakban megjelenhet 
a következő szimbólumokkal: 

CANCEL = eredeti állapotba visszaállít 

DO vagy OK = az utasítást végrehajtja 

CONTINUE = az utasítást újra végrehajtja. 

Ha Ön ezek közül választott, az ablak eltűnik és a gép az 
utasítást végrehajtja. 


íróasztal (DESKTOP) 

Az íróasztal a FC III fontos üzemmódja. Az íróasztalból Ön 
bármikor áttérhet a fagyasztóba (FREEZER), vagy a MONI- 
TOR-ba stb... 

A DESKTOP be- és kikapcsolása 

Négy lehetőség van arra, hogy az íróasztalt aktivizáljuk: 
— A C-64 bekapcsolásakor automatikusan a desktop-ra ke¬ 
rülünk, 

— A BASIC SYSTEM menüjéből kiválaszthatjuk a DESK¬ 
TOP szimbólumát, 

— BASIC-ban beírjuk a DESKTOP utasítást, majd 
RETURN-t nyomunk, 

— A FREEZER menü EXIT almenüjéből kiválasztjuk a 
DESKTOP funkciót. 

Ha a CTRL és mindkét SHIFT gombot egyszerre megnyom¬ 
juk, akkor ez a dcsktopban RESET-ct vált ki. 

Kiléphet a desktopból ha kiválasztja a BASIC, vagy a 
FREEZER funkciót. 

Munka a DESKTOP-ban 

A desktopban minden funkció ún. PULL-DOWN menüből 
választható ki. A menülista az alábbiakból áll: 


INFO SYSTEM PROJECT UTILITIES CLOCK 


DESKTOP BASIC NOTEPAD 

VERSION FINAL KILL DLINK 
FREEZER TLINK 
REDRAW 


PREFERENCES TIME 
BASIC PREFS ALARM 
CALCULATOR SETTINGS 
DISK 


INFO 

Az INFO menüben két almenü van, amelyekben a FC III 
alkotóiról (DESKTOP) és a verziókról (VERSION) kaphat tájé¬ 
koztatást. 

SYSTEM 

Ez a menü négy almenüt tartalmaz: 

BASIC 

Ezt választva a desktopból a BASIC-be kerülünk, előtte 
azonban a kommunikációs ablak megkérdezi, hogy valóban el 
akarja-e hagyni a desktopot. 


37 JÚLI-AUGUSZT. 


G 




HARDVER 


A BASIC bővítések leírása a 8. fejezetben találhatók. 

FINAL KILL 

Ezzel az almenüvel kikapcsolhatja a modult. 

FREEZER 

Az almenü kiválasztásakor újabb (a freezeren belüli) funk¬ 
ciók között válogathat. Ezek a fagyasztó menüknél (9. fejezet) 
lesznek ismertetve. 

REDRAW 

Ez az almenü megújítja az aktuális képernyőt úgy, hogy 
minden megnyitott ablak látható lesz. 

PROJECT 

Ebből a menüből kiválaszthatja a jegyzetfüzet (NOTEPAD) 
almenüt. 

NOTEPAD 

Ha ebben az almenüben megnyomja a tűzgombot, akkor 
megjelenik a jegyzetfüzet, amely a későbbiekben (7. fejezet) ke¬ 
rül ismertetésre. 

DLINK és TÜNK 

Ezek az utasítások egy későbbi fejlesztésben szereplő disk- 
ill. tapc bővítés helyei. 

UTILITIES 

Ebben a menüben igen sok hasznos elem van. Ezek a későb¬ 
biekben ismertetve lesznek. (5. fejezet). 

CLOCK 

A FC III Önnek egy komplett digitális órát bocsájt rendel¬ 
kezésre. 

TIME 

Ha ezt a funkciót választja, akkor a menülista jobb felső sar¬ 
kában a napi idő számjegyes formában kiírásra kerül. 

ALARM 

Ezzel a funkcióval az ébresztést tudja be- és kikapcsolni az 
előzőeknek megfelelő módon. 

SETTINGS 

Az óra beállítására szolgáló ablak két részből áll. A bal olda¬ 
li rész a napi idő, a jobb oldali rész pedig a riasztó beállítására 
szolgál. 

Az idő állításához ki kell választania az éppen megváltozta¬ 
tandó számot. A felfele ill. lefele mutató nyilakkal növelni ill. 
csökkenteni tudja a számot. Az idő beállítása után az USE szim¬ 
bólum kiválasztásával indíthatja el. 

A napi idő, vagy a riasztás ideje 12 órás vagy 24 órás mód¬ 
ban jeleníthető meg. 

Átkapcsoláshoz a PM vagy az AM szimbólumokra vigye a 
nyilat, amelyek gombnyomásra eltüntethetők. 


UTILITIES (segédeszközök) 

CALCULATOR zsebszámológép 

PREFERENCES képernyőbeállítás 

DISK lemezmeghajtó üzem 

BASIC PREFERENCES BASIC utasítások 
TAPE kazettás üzem 

CALCULATOR (zsebszámológép) 

A zsebszámológép az UTILITIES menüből választható ki. 
Az ezzel végzett munkát a zárószimbólum kiválasztásával 
fejezheti be. A zsebszámológép a négy alapműveletet tudja, va¬ 
lamint memóriával rendelkezik. A műveletek a billentyűzet 
ill. az ablakszimbólumok révén végezhetők el, az alábbiak 
szerint: 
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MŰVELETEK 

BILLENTYŰZET 

ABLAKSZIMBÓLUM 

Összeadás 

+ 

+ 

Kivonás 

— 

— 

Szorzás 

* 

• 

Osztás 

/ 

/ 

Egyenlő 

= v. RETURN 

= 

Bevitel memóriába 

E 

ME 

Memória törlése 

C 

MC 

Memória megjelenítése 

R 

MR 

Utolsó bevitel törlése 

CLR/HOME 

C 

Teljes törlés (kiv. mem.) 

INS/DEL 

AC 

Tizedespont 

• vagy , 


PREFERENCES (képernyőbeállítások) 



A PREFERENCES lehetőséget nyújt arra, hogy a modul 
alapbeállítását több helyen megváltoztassa. 

A PREFERENCES a UTILITIES menüből választható ki. 
Ha ki akar lépni, az OK, vagy a CANCEL mezőt válassza ki. 
Az alábbi paramétereket tudja megváltoztatni: 

— a képernyő színét, 

— a mutató színét, 

— a mutató sebességét és gyorsulását, 

— a joystick portok felcserélését, 

— választást a joystick és az egér között. 

SCREEN (képernyő) 

A képernyő színei megváltoztathatók a fel ill. lefelé mutató 
nyilak segítségével. 

A COLOR1 felirat az előtér színére, a COLOR2 felirat a 
háttér színére vonatkozik. 

POINTER (mutató, nyíl) 

A mutató színe éppúgy megváltoztatható, mint a képernyőé. 
A VELOCITY felirat alatt a mutató sebességét, az ACCELERE- 
TION felirat alatt pedig a mutató gyorsulását állíthatja be három 
fokozatban. 

Bemenet kiválasztása 

A CRIVER felirat alatt kiválaszthatja az 1. vagy 2. portot 
akár joystick, akár egér használata esetén. 

A beállítások rögzítése 

A default felirat kiválasztásával a korábban beállított képer¬ 
nyőt láthatja, a VIEW felirat kiválasztásával az újonnan beállított 
képernyőt tekintheti meg. 

Az OK használatával aktivizálhatja az új beállítást, a CAN¬ 
CEL választásával visszatérhet az eredeti beállításhoz. 


DISK (lemezmeghajtó üzem) 

A DISK utasítások ablakai lehetővé teszik, hogy néhány 
gyakori disk utasítást egyetlen gombnyomással választhasson ki. 
Ezek a következők: 

DIRECTORY Ebből egyidőben három is megjeleníthető a 
képernyőn. 

RUN Egy directory-ból kiválasztott programot 

elindít. 

RENAME Átnevez egy programot. 

SCRATCH Töröl egy programot. 

FÁST FORMÁT Egy lemezt gyorsfbrmatál. 

EMPTY Teljes lemeztartalmat töröl. 

VALIDATE Szabad blokkokat gyűjt egy lemezen. 

INITIALIZE Disk felismerése a lemezmeghajtó 

számára. 

READ STATUS A hibacsatorna hibaüzenetének kiíratása. 


DIRECTORY megnyitása 

Megjeleníthető a képernyőn egy lemez tartalomjegyzéke, ha 
a három DIR mező közül valamelyiket kiválasztja. 

Ekkor a modul megnyit egy ablakot, amelyen a töltés alatt 
a SEARCHING felirat jelenik meg. Ha a directory betöltődött, 
megjelenik az ablakban a lemez neve. 
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Ha a directory nem fér el az ablakban, akkor a megjelenítés 
a nyilak segítségével tél-le görgethető. 

Lehetőség van arra, hogy három különböző lemez tartalom- 
jegyzékét egymást követő sorrendben egyidőben megjelenítsen 
a képernyőn. 

Amennyiben a képernyőn több lemeztartalmat megjelení¬ 
tett , az aktuális utasítások csak abban a directory-ban végezhetők 
el, amelyik éppen aktív. Ezt a megfelelő DIR ablak inverzben 
jelzi. Ha éppen nem aktív ablakban kíván dolgozni, állítsa in¬ 
verzbe a megfelelő DIR ablakot. 

DIRECTORY rendezése 

Egy beolvasott directory-ban a file-okat újra rendezheti a 
SORT ablak kiválasztásával, ezen felül elválasztó vonalakat is 
beültethet a sorok közé az alábbiak szerint: 

a) Válassza ki az eltolandó file-t. 

b) Vigye ezt az új helyére a nyilak segítségével. 

c) Ismételje az a)-t és a b)-t a további rendezendő lile-okra. 

d) Vonal elhelyezése (a lista szakaszokra osztása) a LINE 
kiválasztásával lehetséges. Ez a vonal az előzőleg kiválasztott fiié 
alá kerül. 

e) Ha a szortírozás kész, újra válassza ki a SORT-ot, mire 
egy ablak jelenik meg, megerősítést kérve, hogy a lemezre 
visszaírja-e az új directory-t. 

RUN 

Ha egy programot ki óhajt választani, vigye a mutatót a 
megfelelő programnévre és nyomja meg a tűzgombot. Ekkor a 
név inverzre vált. A program indításához most a mutatót a RUN 
mezőbe kell vinnie, és megnyomni a tűzgombot. Miután a RUN 
mező is inverzre váltott, válassza ki a DO mezőt, és az utasítás 
végrehajtódik, a program floppygyorsítóval betöltődik és a prog¬ 
ram automatikusan elindul. 

RENAME 

Először ki kell választania a tartalomjegyzékből az átneve¬ 
zendő program nevét, majd a RENAME mezőre rámutatnia. 

Ekkor a FROM mezőben megjelenik az átnevezendő prog¬ 
ram neve. 

A TO mező kiválasztása után beírhatja az új nevet. 

A DO mező kiválasztásával az átnevezés megtörténik. 

SCRATCH 

A SCRATCH, majd a DO mezők kiválasztásával egy kivá¬ 
lasztott program törlődni fog a directory-ból. 

FÁST FORMÁT 

Ezzel az utasítással megformázható egy lemez. 

Önnek a FROM mezőbe kell beírnia a lemez nevét, és 
vesszővel elválasztva az ID-t. A DO utasítás kiválasztása után 
egy ablak jelenik meg amelyben a modul megerősítést vár arra 
vonatkoztatólag, hogy valóban elvégezze-e a formattálást, 
minthogy ebben az esetben minden információ elvész a lemez¬ 
ről. 

EMPTY 

Ha a lemeztartalmat törölni óhajtja, formázás helyett vá¬ 
laszthatja ezt a lényegesen gyorsabb módot is, amelyben nem 
kell a lemeznek nevet és ID-t adnia. Az utasítás a DO parancsra 
hajtódik végre. 

VALIDATE és INITIALIZE 

Mindkét parancs a DO parancsra hajtódik végre. 

READ STATUS 

Ha a floppy a LED villogtatásával hibát jelez, és Ön szeretné 
megismerni a hiba okát, akkor a READ STATUS mezőt válassza 
ki, ezután a TEXT mezőben a hibaüzenet kiíródik. 


HARDVER 

TAPE 

A UTILITIES menüből a kazetta-ablakot a TAPE mező ki¬ 
választásával nyithatja meg. Ebből az ablakból két funkciót vá¬ 
laszthat ki: 

SLOW A programot normál sebességgel tölti be 
LOAD "NÉV " szintaxissal. 

FÁST A programot kb. tízszeres sebességgel tölti be 
LOAD "NÉV", 7 szintaxissal!!! 

A kazetta-ablakot a szokásos módon, a bal felső sarokban 
levő zárószinbólummal zárhatja le. 

BASIC PREFERENCES (BASIC beállítások) 

Ön a BASIC programozás megkönnyítésére ebben az eset¬ 
ben az ablakban néhány hasznos segítséget talál. Ezt az ablakot 
az UTILITIES menüből a BASIC PREFS kiválasztásával nyit¬ 
hatja meg. 

KAYBOARD CLICK 

Ha ezt a mezőt választja, a gép minden egyes billentyű le¬ 
nyomásakor hangjelzést ad. Ez különösen hasznos akkor, ha Ön 
a billentyűzetet vakírással kezeli. 

KEY REPEAT 

Ennek az utasításnak a kiválasztása azt eredményezi, hogy 
minden billentyű ismétlővé válik. 

CURSOR BLINK 

Ezzel az utasítással ki- és bekapcsolhatja a kurzor vil¬ 
logását. 

DEFAULT DEVICE 

Kiválaszthatja, hogy melyik perifériára akarja az utasításo¬ 
kat kiadni. (1 = kazetta, 8 = disk drive, 9 = második disk drive) 

BORDÉR COLOR 

Ezzel az utasítással a kívánt keretszín állítható be. 
NUMERIC KEYPAD 

Ezzel az utasítással a C-128-on található nemzetközi tízes 
billentyűzetet C-64 módusban is használhatja, vagy kikap¬ 
csolhatja. 

(Folytatjuk) 


A FINAL 3 árajánlata 

A FINAL 3 működő mintadarabja megtekinthető, kipróbál¬ 
ható, készreszerelve megvásárolható a HOBBI ELEKTRONI¬ 
KA szaküzletben. 

ÁRA: készre szerivé, bedobozolva, letesztelve: 3450 Ft. 
Folyamatosan kapható egységcsomag, panel és részegység a C 
újságban korábban megjelent cikkeimhez is. Ezek egy része mű¬ 
ködés közben megtekinthető, kipróbálható. 

A vidéki olvasóknak segít a szerző levelező-egységcsomag- 
küldő szolgáltaié. A megrendelt bővítőt postán, utánvéttel el¬ 
küldöm. Telefonon és levélben is rendelhet. A HOBBI ELEKT¬ 
RONIKÁHOZ nem kell hosszú levél. Rendelését röviden, egy¬ 
értelműen közölje. Az üzletben megvásárolhatók a C újság ko¬ 
rábbi számai is. 

Levélcím: HOBBI ELEKTRONIKA 
1656 BUDAPEST Pf. 50. 

Üzleteim: 

BUDAPEST VII., Dózsa György út 16. Jobbágy u. sarok. 

Nyitva: H—P. 10—17-ig, zárás után üzenetrögzítő. 

Tel./Fax: 122-8892 
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Felhasználói programok 


Egész lemezt másoló programok 
(backupok) 


A programok iránti minőségi igények 
kielégítésére a programgyártók idővel fel¬ 
hagytak az egy fíle-ba „kényszerítés” el¬ 
vével, és megjelentek az egy vagy több le¬ 
mezoldalt foglaló programok. Ezek má¬ 
solása filecopy-val gyakorta megoldhatat¬ 
lan, mivel így a programvédelem is ki¬ 
használhatja a lemez sajátosságait, pél¬ 
dául a lemezen csak egy tölthető (és má¬ 
solható) program található, és ez tölti a 
program többi részét, esetleg a lemez 
nagy része a normál DOS számára olvas¬ 
hatatlan formában kerül felírásra, melyet 
csak speciális módszerekkel tud a prog¬ 
ram saját töltője beolvasni. így persze az 
ilyen lemezes programok másolására is 
igény merült fel. Többféle másoló ké¬ 
szült, ezek közül szeretnék most néhányat 
bemutatni. Ezek mindegyike C-64-ről 
eredt, így a leírások C-64-en éppúgy ér¬ 
vényesek lesznek, mint PLUS/4-en. 

Az első program az FCOPY. Vi¬ 
szonylag gyors és biztonságos lemezmá¬ 
solást tesz lehetővé, egyszerűen kezelhető 
program. Menüje mindössze három pont¬ 
ból áll: 

FI — Diskcommand (lemezparancs) 
F2 — Backup disk (másolás) 

F3 — Directory (tartalomjegyzék) 
Az FI lenyomására megjelenik a kur¬ 
zor, és begépelhetjük a parancsot, melyet 
a RETURN leütésével küldhetünk el. 

Az F3 hatására megjelenik a lemez 
tartalomjegyzéke. A zavaró hatású vezér¬ 
lőkarakterek (kurzorszín-váltás, ablakde¬ 
finiálás stb.) kiírását a program elkerüli, 
így a kapott lista mindig olvasható (bár ez 
esetleg nem azonos a normál olvasáskor 
látható képpel). 

Az F2 lenyomása után kis ideig (1—2 
másodperc) várnunk kell, ezalatt a gép át¬ 
küldi a floppyba a másoló- és átviteli¬ 
rutinokat, majd kéri a forráslemezt. Fi¬ 
gyelem! Addig ne üssünk RETURN-t, 
amíg nem halljuk, hogy a fej a lemez ele¬ 
jére pozícionál (halk majd megszűnő 
„morgás” a floppyból), különben az első 
sáv (track) olvasásakor problémák merül¬ 
hetnek tél! A gép beolvassa ez első ada¬ 
got, majd kéri a céllemezt, kiírja a tár tar¬ 
talmát, majd ismét a forrást kéri. Össze¬ 
sen három menetben másol. A talált hibá- 


kát kijelzi, egyiket-másikat másolni is ké¬ 
pes (ilyen például a SUPERBASE leme¬ 
zén található hiba, melyet a program be¬ 
töltéskor keres, és csak akkor nyugszik 
meg, ha megtalálja, ugyanis a hiba a prog¬ 
ram védelmének része). A PLUS/4 verzió 
Nagy Tamás munkája. A leggyorsabb (so¬ 
ros) verzió a 2.5, ez 3 perc 15 másodperc 
alatt másol egy lemezt, a cseréket is be¬ 
számítva. A V2.2 ellenőrzi is, amit kiírt, 
így a másolás 4 perc 30 másodpercig tart, 
míg a portos verzió (mely szintén ellen¬ 
őriz) 3 perc 15 másodperc alatt másol le 
egy lemezt. A program formázatlan le¬ 
mezre is képes írni. 

A következő másoló a kissé megté¬ 
vesztő nevű 90 SEC COPY, mellyel 
(PLUS/4-en) két perc tizenöt másodperc¬ 
nél gyorsabban nem tudtam lemásolni egy 
lemezoldalt, bár az FCOPY-val összeha¬ 
sonlítva ez is igen jó eredmény. A 
PLUS/4-es verzió CROWN és P1GMY 
munkája. 

A programnak angol és német ver¬ 
ziójával találkoztam, én a továbbiakban az 
angol szövegeket (és magyar megfelelői¬ 
ket) fogom megadni, de a két változat ke¬ 
zelése megegyezik, így remélem ez nem 
okoz gondot. 

Az első kérdés, amit a program fél¬ 
tesz, a BAM SELECT, melyre a No vá¬ 
laszt várja alapesetben. Ez azt határozza 
meg, hogy a lemezről csak a DOS által 
foglaltnak nyilvánított területet (Yes 
válasz), vagy az egész lemezoldalt kíván¬ 
juk-e lemásolni. A következő a MORE 
TRLAL, ahol arról dönthetünk, hogy hiba 
esetén a program többször próbálkoz¬ 
zék-e a beolvasással (Yes), vagy az első 
beolvasás után fogadja el a hibát (No vá¬ 
lasz). Ezután dönthetünk az ellenőrzés¬ 
ről, a VERIFY kérdésre adott Yes válasz 
bekapcsolja, a No kikapcsolja azt. Miután 
ezt eldöntöttük, a program a FORMÁT 
DISK kérdést teszi fel. Ha itt Yes-t vála¬ 
szolunk, írás alatt a céllemezt formázni is 
fogja a másoló, egyébként nem. Ez nem 
lassítja számottevően a másolást, nem árt 
tehát kiválasztani. Ha igenlő választ 
adunk a program bekéri a céllemez ID-jét 
és nevét, ha nemlegest, csak a nevet. Ha 
bármikor (akár egy kérdésre válaszolva. 


akár a másolás kellős közepén) villogó 
kurzornál $-t ütünk, megjelenik a kataló¬ 
gus első oldala, melyben a programok 
kezdősávját, -szektorát, hosszát és nevét 
találhatjuk meg. Ha ezután Yes-t ütünk, 
megjelenik a következő oldal, és így to¬ 
vább a directory végéig, ahol a REPLY-ra 
nyomott RETURN után folytatódik a má¬ 
solás vagy az utoljára féltett menükérdés 
jelenik meg újból. Hasonlóképpen, bár¬ 
mikor félbeszakíthatjuk a másolást a t 
bevitelével. A program igen gyorsan má¬ 
sol, a GCR kódolással nem törődik, 
PLUS/4-en négy menetben visz át egy ol¬ 
dalt. Formázással, ellenőrzéssel, több¬ 
szöri próbálkozással két perc ötvenöt má¬ 
sodperc alatt, ezek nélkül negyven má¬ 
sodperccel gyorsabban végez, és ezzel 
magasan fölülmúl minden egyéb másolót. 

Vannak programok, amelyek nem 
másolhatók ilyen módszerekkel, például 
mert a DOS számára olvashatatlan formá¬ 
tumban írták őket a lemezre, vagy valami 
egyéb „huncutságot” követett el a véde¬ 
lem írója. Ezeket a NIBBLER másolók¬ 
kal lehet lemásolni (már ha le lehet egyál¬ 
talán). Ezek közé tartozik Mike J. Henry 
munkája is, a NIBBLE HACKEM, me¬ 
lyet Nagy Tamás dolgozott át PLUS/4-re. 
A program maximum 41 sáv másolására 
képes (az alap DOS csak 35 sávig „dolgo¬ 
zik”), és lehetőségünk van a felírási mó¬ 
don változtatni (ezt azonban mindenki ke¬ 
rülje el, aki nem ért a floppyhoz és prog¬ 
ramozásához!). A program menüjének 
felépítése: 

D) irectory (lemezkatalógus) 

C)opy disk (másolás) 

E) xit (kilépés) 

(FI) Verify on/off (ellenőrzés be/ki) 
(F2/F5) Starting track (kezdősáv) 
(F3/F6) Ending track (utolsó sáv) 
(F7/F8) Track incremcnt (C-64) 

(F8/F7) Track incremcnt (PLUS/4) Sáv¬ 
lépésköz 

(SHFT) H)eader tail gap :$08 
(SHFT) T)ail gap :$09 

A „D” gombbal kérhetünk tartalom- 
jegyzéket, melyet a SPACE-szel állítha¬ 
tunk le/indíthatunk újra, és a RUN/STOP- 
pal szakíthatunk meg. ,,C”vel megkezd¬ 
hetjük a másolást. ,,E”vel kiléphetünk 
a programból, ha a biztonsági kérdésre 
Yes-t válaszolunk. Fl-gyel az ellenőrzést 
kapcsolgathatjuk ki/be. A kezdősávot 
F2-vel növelhetjük, F5-tel csökkenthetjük 
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féltrackes lépésekben. Ajánlott értéke 1.0. 
Az F3 növeli, az F6 csökkenti az utolsó 
sáv sorszámát, szintén félsávonként. Ha 
normális lemezt másolunk, hagyjuk nyu¬ 
godtan 35.0-n, ha valami „kacifántosát”, 
nem árt, ha 41.0-ra állítjuk. A sáv-lépés¬ 
közt hagyjuk 1.0-n. Nem sok értelmét lá¬ 
tom elállítani. Ez ugyanis azt határozza 
meg, hogy hány sávnyit lépjen a fej két ol¬ 
vasás/írás között. Ha értéke egynél na¬ 
gyobb, nem fogunk minden sávot beolvas¬ 
ni, ha kisebb, a COMMODORE meghaj¬ 
tók fizikai felépítése miatt (széles a mág- 
nesíéj) értelmetlenségek kerülnek a le¬ 
mezre (ugyanis a fej több, mint fél sáv szé¬ 
les, így íélsáv olvasásakor az előző és a 
következő „egész” sáv tartalma is beleját¬ 
szik az olvasásba, illetve a félsáv írásakor 


ezek károsodhatnak). A „H” gomb le¬ 
nyomása növeli, a [SHIFT-HJ csökkenti a 
header-tail gap méretét, míg a „T” illetve 
a [SHIFT-T] ugyanígy használatos a tail- 
gap állítására. Ez a két érték az, amit nem 
szabad kellő hozzáértés nélkül átállítani. 

Itt most visszatérnék a másolás me¬ 
nüpontra. A gép kéri a forráslemezt, és 
megpróbálja beolvasni a BAM-ot (18. sáv 
0. szektor, a lemez lefoglaltsági térképe, 
a Block Availability Map). Ha ez sikerül, 
a másolás megkezdődik, ha nem, hiba¬ 
üzenetet kapunk. Egy menetben hét sáv 
kerül beolvasásra, majd kiírásra, így egy 
lemez öt vagy hat menetben lemásolható. 
PLUS/4-en ellenőrzés nélkül közel hét 
percig tartott egy lemezoldal átvitele a so¬ 
ros verzióval, míg a párhuzamos (port) 


verzió ellenőrzéssel is három perc alatt 
végzett. 

Érdekes hibája a programnak, hogy 
hajlamos 20-as READ ERROR-t „gyár¬ 
tani” a cél lemezen, és ezt észre sem veszi. 
Másolás után tehát érdemes például D1SK 
DÉMON-nal összehasonlítani a két le¬ 
mez hibatérképét. Ha a céllemezen olyan 
hiba van, ami az eredetin még „nem volt 
meg”, akkor jegyezzük meg ennek a sáv¬ 
ját, és csak a sávot másoljuk újra a NIBB- 
LERrel. 

Ennyit mára a lemezmásolás lehető¬ 
ségeiről. Tulajdonképpen ez a rész fölös¬ 
leges volt, hisz az Olvasónak bizonyára 
csak eredeti, gyári programjai vannak, és 
szigorúan megveti a kalózmásolást... 

Kovács István Attila 
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írás a keretbe 

A 1100 LDX 

#$00 

A második képernyő memória 

1102 LDA 

#$10 

Szín $1000 

1104 STA 

$1000,X 

Kép $4000 

1107 LDA 

#$20 

Első 120 kar. helyére fehér ill. szó- 

1109 STA 

$I400,X 

köz írása. Ez lesz az alsó keret há- 

110C INX 


rom sora 

110D CPX 

#$79 


110F BNE 

$1102 


1111 LDA 

#00 


1113 STA 

$4000 

BASIC terület áthelyezés a $4000 

1116 LDX 

#$01 

kezdőcímre 

1118 STX 

$2B 


111A LDA 

#$40 


11 IC STA 

$2C 


111E STA 

$2E 


1120 LDA 

#$03 


1122 STA 

$2D 


1124 SEI 

1125 LDA 

#$3A 

Rutinunk kezdőcíme ($ 113A) 

1127 STA 

$0314 


112A LDA 

#$11 

a $0314—0315 címre 

112C STA 

$0315 


112F LDA 

#$CC 

#$CC, írás a megszakítás engedé- 

1131 STA 

$FF0A 

lyező regiszterbe 

1134 LDA 

#$00 


1136 STA 

$D1 

0 írás az $D1 ideiglenes tároló hely- 

1138 CLI 


re. Itt tároljuk az X értékét a meg- 

1139 RTS 


szakító rutinhoz. 

113A LDA 

$FF09 


113D STA 

$FF09 


1140 LDX 

$D1 

Két képernyő váltakozó átírása az 

1142 LDA 

$1190,X 

$FF13 és FF 14 regiszterekben az 

1145 LDY 

$1193,X 

$FF1C — FF1D videosor számláló 

1148 STA 

$FF1C 

és az $FF0A—FF08 raszter meg- 

114B STY 

$FF1D 

szakítás figyelésével. A váltáshoz 

114E LDA 

$1196,X 

szükséges értékeket az $1190— 

1151 LDY 

$1199,X 

11A7 címekről írhatjuk be. 


1154STA $FF0A 

1157 STY $FF0B 

115ALDA $119C,X 
115DLDY $119F,X 
A 1160 STA $FF06 

1163 STY $FF07 

1166 LDA $11 A2,X 

1169 STA $FF13 

116CLDA $11A5,X 

116FSTA $FF14 

1172 INX 

1173 CPX #$03 X érték növelés 

1175 BNE $1182 

1177 JSR $CECD 

117AJSR $CFBF 

117DJSR $DB11 billentyű figyelés 

1180 LDX #$00 X érték 0-ra újra indításhoz 

1182 STX $D1 

1184 JMP $FCC3 Vége 

1187 BRK 

M 1190 01 00 00 36 C2 EA A2 A2 
1198 A2 11 D0 CD 1B 1B 1B 08 
11A0 08 08 Dl Dl Dl 10 10 08 

A program indítása: SYS 4352 

A keret három sorába POKE utasítással vagy gépi kódú ru¬ 
tinokkal írhatunk, a második képernyő memória első 120 karak¬ 
ter helyére. 

A második képernyő memória: szín $1000 — 13FF 

kép $1400 - 17FF 
A képernyő memória: $0800 — szín 

$0C00 — kép egész területét 
használhatjuk. 

BASIC programokhoz grafikus mód nem használható. 
Mivel a második képernyőből csak az $1000 — 1079 és az 
$1400— 1479 terület látható kereten, az $1100— 13FFésl500 
— 3FFF területet felhasználhatjuk gépi kódú programozásra. 
Ez a program is így kerülhetett az $1100 — 11A9 területre. 

Kiss István 
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IBM PC 


Softwareújdonságok 

Excel 4.0 Hungary fór Windows 


Az Excel 4.0-ás táblázatkezelő prog¬ 
ram Windows alatti, magyarnyelvű, Mic¬ 
rosoft fejlesztésről fogunk beszélni. Beve¬ 
zetésképpen nézzük meg, hogy mit is 
mondott a programról a Microsoft: 

„...Attól a pillanattól fogva, hogy a 
Microsoft Excel fór Windowst először 
használjuk, esküdni fogunk rá, hogy úgy 
gondolkodik, ahogyan mi. Előre látja, 
hogy mik az igényeink, kiszámítja, mi 
lesz a következő lépés. Nagyon hamar el 
tudunk készülni olyan feladatokkal, amik¬ 
hez eddig órák kellettek. Sőt a Microsoft 
Excellel éppen azokat a feladatokat lehet 
a legkönnyebben végrehajtani, amik a 
leggyakrabban fordulnak elő. A Micro¬ 
soft Excel azért teszi könnyebbé a min¬ 
dennapi munkát, mert úgy terveztük, 
hogy meghallgattuk a táblázatkezelők 
használóinak javaslatát. Figyeltük, ho¬ 
gyan dolgoznak. Ha láttuk azt, hogy egy 
közönséges feladathoz tíz lépésre van 
szükség, kitaláltuk, hogyan lehet ugyan¬ 
azt a feladatot két lépésben megoldani. A 
táblázatkezelő ragyogó teljesítménye, 
más alkalmazásokkal való összhangja és 
páratlanul könnyű használhatósága meg¬ 
nyerte a Microsoft Excel számára csak¬ 
nem az összes szoftverdíjat, még az Info 
World Év terméke díját is. A bírálók is és 
a felhasználók is egyhangúan a Microsoft 
Excelt ítélték a legjobb Windows táblázat- 
kezelőnek. Nincs, ami helyettesítené. 

A Microsoft Excel a Windows táblá¬ 
zatkezelő!!!...” 

Figyelemreméltó előnyei a többi táb¬ 
lázatkezelővel szemben: 

Teljesen magyar nyelvű, beleértve a 
legördülő menüket, a hibaüzeneteket és a 
súgót is. 

Magyar nyelvű helyesírásellenőrző. 

Összefüggéseket keres az adatok kö¬ 
zött, és magától folytatja a táblázatot. 

Könnyű adatkivágás, másolás, áthe¬ 
lyezés. 

Egy lépésben tudunk hozzáférni a 
leggyakrabban használt parancsokhoz, 
hiszen ezek a képernyő tetején, ikon for¬ 
májában találhatók meg. 

A még ettől is fontosabb parancsokat 
az egér jobboldali gombjával hívhatjuk 
elő. 

Több táblázatot tudunk egy fájlba 
menteni. 


Le tudjuk menteni a képernyő egyes 
állapotát, így azonnal le tudjuk kérdezni 
a táblázat egyes nézeteit. 

Az aktuális adat méretéhez tudjuk 
alakítani az oszlopok és a sorok szé¬ 
lességét. 

Egyetlen kattintásra összegzi a szám¬ 
sorokat és oszlopokat. 

Készíthetünk forgatókönyvet, rész¬ 
táblázatokat. 

Tartalmazza a pénzügyi, statisztikai, 
műszaki, és tudományos függvényeket. 
Összesen 160 függvényt és eljárást, ami 
természetesen bővíthető. 

Több táblázat „összefésülésére” is 
van lehetőség. 

Készíthetünk vázlatokat is. 

Egyenletek megoldása, akár több is¬ 
meretlennel is. 

Objektum csatolás és beágyazás más 
Windows alatti programokból vagy prog¬ 
ramokba. 

A tesztek szerint (National Software 
Testing Laboratories) a LEGGYORSABB 
táblázatkezelő. 

Szabadkézi vázlatkészítésre való le¬ 
hetőség. 

Készíthetünk diagrammokat, rajzo¬ 
kat, ábrákat a vázlat vagy a kész táblázat 
szélére. 


SZOFTVER H 

A táblázat kinézetét 14 előre elkészí¬ 
tett formátumból választhatjuk ki, de ha 
egyik sem tetszik, akkor mi magunk is ké¬ 
szíthetünk ilyeneket. 

Beállíthatjuk a számok, mértékegy¬ 
ségek és pénzegységek formátumát is. 

Diabemutató. Akár hanghatással is 
figyelmeztethetjük magunkat. 

90 féle diagramtípusból választha¬ 
tunk, természetesen léteznek elforgatható 
3D diagramok is. 

Más 19 különböző táblázatkezelő táb¬ 
lázatait felismeri, s tudja használni őket. 

A Microsoft Excel futtatásához szükséges 
alapkonfiguráció 

MS-DOS 3.1 vagy későbbi verziója 
(6.0-t javasolunk) 

MS-Windows 3.1-es magyar verziója 

(üü) 

286-os vagy azzal felülről kompatibi¬ 
lis mikroprocesszorú gép (386 DX-et ja¬ 
vasolunk). 

2 vagy több MByte memória 
(4MByte-t javasolunk). 

5,25 inch-es 1,2 MBytes vagy 3,5 
inch-es 1.44 MBytes lemezmeghajtó. 

EGA vagy annál jobb felbontású mo¬ 
nitor (Monochrome VGA vagy színes 
VGA-t javasolunk). 

MS-Windows által használható háló¬ 
zatokkal képes együttműködni. 

Az MS-Windows által használt nyom¬ 
tatók használhatók. 

Egér 

A program használatához sok sikert 
kívánok: 

Kun Szilárd 
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C 64, AMIGA, PC PCVAT 

FRIEND 1WO CREl A/ 



IBATTILE CGESS 


Öreg játék, nem vén játék. De nem 
inkább rossz játék. E közmondás igaz a 
most következő játékra, amiről a leírást 
készítettük. Ez pedig nem más, mint a 
Battle Chess, amit 1988-ban készített az 
Interplay Amigára, C64-re, PC-re és 
Atari-ra. 

A legtöbb sakkprogramnak az az egy 
hátránya van, hogy a játékos mindig csak 
az „unalmas” sakktáblát nézi a képer¬ 
nyőn, és azon gondolkodik, hogy hová 
lépjen. A Battle Chess ezt az unalmat 
akarja eloszlatni, s humorossá, élvezetes¬ 
sebbé akarja tenni a sakkozás örömét. 
Igen, meglepő újdonságokat tartalmaz a 
többi sakkprogramhoz képest. A tábla 
3D-ben megrajzolt, s a bábuk szépen el¬ 
készített animációval mozognak. Minden 
lépéskor és ütéskor új poénok kerülnek 
elő, s ez az egész játszmát humorossá 
teszik. 

Ha lépünk valamelyik figurával, az 
adott bábú szó szerint odamegy, s ha pedig 
ütünk, akkor eljátszák a harcot. Az egyes 
figurák sem a megszokott sakk bábúk, ők 
egy másik adventure, vagy kalandjáték is¬ 
mert szereplői. Nézzük is meg sorba őket: 

Gyalog: egyszerű harcos, lándzsával, 
aki a harcban néha visszavonul, s elszalad 
ellenfele elől. 

Bástya: Ő a legerősebb, egy kőember 
(gólem). A legegyszerűbb harcmodort vá¬ 
lasztja: beledöngöli ellenfelét a földbe. 

Futó: Egy varázsló, fáklyával felfegy¬ 
verkezve, amivel az ellenfelét szokta el¬ 
égetni. De ha a futót a bástya leüti, a fák¬ 


lya kialszik, s jöhet a földbe döngölős 
technika. 

Vezér: Boszorkány. Ellenfeleit kü¬ 
lönböző állatokká varázsolja, mint pél¬ 
dául egérré, vagy békává. 

Ha a gép tölt, akkor a bal felső sarok¬ 
ban a ,,ZZZZ” feliratot látjuk, ha viszont 
gondolkodik, akkor Rodin: Gondolkodó 
című művének a képe látszik. 

Az FI gomb lenyomása után megjele¬ 
nik a legördülőmenü. 


Itt a következőket választhatjuk ki: 
Disk: 

Load game: kimentett játékállás be¬ 
töltése 

Savé game: játékállás kimentése 

New game: új játék kezdése 

Setup board: Bizonyos helyzetek elő¬ 
állítása. Uj bábúkat rakhatunk fel a táblá¬ 
ra, levehetünk bábúkat, s ezzel csalhatunk 
is: pl.: 5 vezér egy játékban az ellenfél 1 
gyalogjához képest. De használható sakk¬ 
feladványok megoldásához is. 

Quit: Kilépés a játékból. 

MOVE: 

Take back: Az utolsó lépés törlése. 

Replay: A törölt lépés visszaállítása. 

Suggesl Move: A program javasol 
egy lépést, ami szerinte a legjobb. (Vi¬ 
gyázzunk, ha a gép ellen játszunk, mert 
így csalhat). 

Settings: 

Sound ON/OFF: hang be/kikap¬ 
csolás 

Walk ON/OFF: a bábúk lépés utáni 
sétálásának ki/bekapcsolása. 

Combat ON/OFF: ütéskor a harc 
be/kikapcsolása. 

3D/2D Board: 2 és 3 dimenziós tábla 
beállítása. 2 D-ben nincs animált mozgás 
és harc. 

Level: Nehézségi szint. 

Nemrégiben jelent meg egy új Battle 
Chess is, ami azonban nem a hagyomá¬ 
nyos sakkra épül, hanem a kínai sakkra, 
de ebben a programban is megtalálható az 
animált mozgás, és a harc is. 

Kun Szilárd 
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Egy jó játék C-64-en! 

E legendás LODE RUNNER 93-as 
színvonalú változata remélhetőleg sok 
örömet okoz majd a stílus kedvelőinek. A 
helyzet adott: egy téglákból és létrákból 
álló pályán kell az üldözőket — maximum 
öt — elkerülve összeszedni a villogó koc¬ 
kákat. Ezt mindenki a saját ízlése szerint 
nevezze el gyémántnak, kárpótlási-jegy¬ 
nek, BKV-bérletnek, de a továbbiakban 
Bigyó lesz. 

A játék bárgyúnak tűnhet, de rendkí¬ 
vül — mégegyszer — rendkívül jó a játsz¬ 
hatósága. Semmi idétlen scrollozás, őrjítő 
vibrálás, űrhajó, lövöldözés és miegyéb. 


Egyetlen fegyverünk: Emberünk akivel a 
tűzgomb hatására dobbanthatunk egy ak¬ 
korát, hogy az előttünk levő tégla elporlad 
és ezzel megcáfoltuk az ,,Aki másnak 
vermet ás...” nevezetű közmondást, 
ugyanis derék üldözőink egyenként bele¬ 
esnek (egy verembe egy ember!) Előfor¬ 
dulhat, hogy bele kell esnünk nekünk is, 
mert egy Bigyót csak a mennyezeten ke¬ 
resztül lehet megközelíteni. Ekkor ügyel¬ 
jünk arra, hogy a gödröt egy idő után bete¬ 
metik, s ha úgy adódik velünk együtt. Ha 
kilátástalan helyzetbe kerülünk a RUN/ 
STOP billentyűt megnyomva emberünk 
exitál. 


A pályákon az üldözőkön kívül a kö¬ 
vetkezők találhatók: 

Bigyó: mindet össze kell szedni 
Tégla: ezen szaladunk a többiek elől 
Kő: ezen is szaladunk, de nem ásha¬ 

tunk vermet 

Létra: leugorhatunk róla 
Rúd: függeszkedve haladhatunk a Bi- 

gyók felé 

Altégla: egyszerűen átesünk rajta, 
kellemes 

Trafó: szikrákat szór és belehalunk ha 
eltalál 

Kijárat: a Bigyók összeszedése után ide 
kell mennünk 

Ha unjuk a harminc gyári pályát ak¬ 
kor megpróbálkozhatunk a pályakészítés¬ 
sel. A CRSR billentyűkkel választhatunk 
a tereptárgyak közül(lásd fent). Beállít¬ 
hatjuk a háttér, a tárgyak, és a tárgyak má¬ 
sik színét is. Megszabhatjuk, hogy meny¬ 
nyi időt adunk a pálya teljesítésére, sőt 
még a pontszám színét is. Az elkészült pá¬ 
lyát kimenthetjük, betölthetjük. 

Egyetlen hibája, hogy az üldözők 
mozgása nem olyan logikus mint a LODE 
RUNNER-ben, gondolom ezért van ben¬ 
ne trafó. 

Ez egy rendkívül jó szórakozást nyúj¬ 
tó program a játszhatóság kitűnő, a grafi¬ 
ka ehhez a stílushoz bőven jó, az animáció 
borzasztóan jó. Egyedüli probléma ami az 
elején kellemetlenséget okozhat, hogy a 
létrára átlósan(!) lehet felmenni, ha előre 
nyomjuk nem. 

Kellemes élmény és kellemes csaló¬ 
dás, hogy a 93-as verzió ellenére nem egy 
rossz, hanem egy rettenetesen jó játékot 
kaptunk L. K. Avalontól. Sajnos mostaná¬ 
ban egyre több szörnyűség is napvilágot 
lát. A CROMANCE verzió hibátlannak 
hirdeti magát, C-64-en lemezen és kazet¬ 
tán is létezik. 

BBEE 


LEMMINGS 


Végre elérkezett a várva-várt pillanat! 
A nagy LEMMINGS megjelent C-64-en 
is! Igaz, hogy AMIGÁN és PC-n már van 
LEMMINGS II sőt X-MAS LEMMINGS 
is, de C-64-en ez a program szenzációsan 
jól sikerült! 

A kazettások bosszankodhatnak, 
mert lemezen nemkevesebb, mint öt(!) ol¬ 
dalt foglal el. A játék lényege, hogy min- 
nél több vándorló állatkát mentsünk meg 
a haláltól. Barátaink ugyanis kamikaze 
módon próbálják leküzdeni az akadályo- 
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kát, melyek a cél felé vezető úton bősége¬ 
sen találhatók. Ha egy szakadék kerül az 
útjukba akkor mint aki „se lát, se hall” 
szép sorjában lepotyognak és a padlóza¬ 
ton szörnyű halált halnak. 

Mi ekkor, illetve a kellemetlen ese¬ 
mény bekövetkezte előtt avatkozhatunk 
be. 

A számbillentyűket lenyomva válo¬ 
gathatunk az alsó sorban feltüntetett cse¬ 
lekvések között. Csak azt a cselekvést 
tudjuk „megparancsolni” a célkereszttel 
kiválasztott állatkának, amelyikből még 
van. Ez az ikon felett látható szám jelzi. 


Senki sem gondolta, hogy a sikeres 
FIRST SAMURAI-nak lesz második ré¬ 
sze. Pedig lett. A játék neve SECOND 
SAMURAI, ami pár dologban eltér előd¬ 
jétől. Először is a programba beletették a 
2 player opciót. Azonkívül kardot nem a 
különböző tárgyak kiütésével lehet meg¬ 
szerezni, hanem a varázskönyvek aktivá¬ 
lásával. Ebben a játékban sotéle varázsla¬ 
tot tehetünk. A program elején beállítható 
dolgok az OPTIONS menüben az 
alábbiak: 

Életek száma, nehézség, sound effek¬ 
tek, ki és bekapcsolása, társunkhoz való 
viszonyulás (meg lehet-e sebezni, vagy 
nem), kódok beírása. Ezek után nézzünk 
meg néhány tárgyat, dolgot, amivel játék 
közben találkozhatunk. 

SÁRGA KÖNYV: Aktiválásával egy 
kardhoz jutunk. 

BARNA KÖNYV: Felszedésével vará¬ 
zsolni tudunk. Érdemes ezt a főellensé¬ 
gekre tartogatni. 


Ha lenyomva tartjuk a bal SHIFT billen¬ 
tyűt, akkor „kimerevedik” a képernyő. 
Ez nagyon praktikus funkció, mert így 
könnyedén eltalálhatunk a célkereszttel 
egy zuhanó lemmingst pl. az ejtőernyő pa¬ 
ranccsal. Próbálnánk meg nélküle! 

Mindenképpen érdemes végignézni 
az intrót. Igazán kellemesre sikerült! 

A program szépen kidolgozott ani¬ 
mációival, kellemes zenéjével és kitűnő 
játszhatóságával szinte felülmúlta a C-64 
lehetőségeit. 

Kár lenne kihagyni... 

BBEE 


ZÖLD KÖNYV: Megszerzésével egy 
ideig sérthetetlenek leszünk. 

TŐR: Aktiválásával szamurájunk tő¬ 
röket kezd el dobálni. 

KOPONYA: Bombaként tudjuk 

használni. 

KIS FIOLA: Hasonlóként viselkedik 
mint a koponya. 

PALACK: Felvételével élethez 

jutunk. 

GYÜMÖLCS: Energiát ad. 

SÜLTCSIRKE: Életerőnket a maxi¬ 
mumra állítja. 

A felvett tárgyak között a SHIFT-tel 
lehet lapozgatni. A különböző tárgyakat a 
tűzgomb folyamatos nyomvatartásával ak¬ 
tiválhatjuk. A pályákon néhány helyen kis 
csillogásokat észlelhetünk, ezeket kiütve 
is találhatunk hasznos tárgyakat. A szin¬ 
tek végén megjelenő kis gömbökkel lehet 
teleportálni. így néha bónuszpályákra ju¬ 
tunk, ahol értékes tárgyakra lelhetünk. 
Minden pálya végén egy kódot kapunk. 


llPPCIx, 
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LOCOMOTION levelkódok (C-64) 

levet B : boot 
level C : chor 
levet D : dore 
level E : ente 
leve! F : fuss 
level G : gift 
level H : hand 
level I : iglu 
level J : jahr 
level K : kuss 
level L : land 

SU SWEET levelkódok (C-64) 

level 2 : ugh 
level 3 : muh 
level 4 : toe 
level 5 : bla 
level 6 : pah 
level 7: puh 
level 8 : fic 
level 9 : wum 

TERMINATOR II (AMIGA) 

Állítsuk meg a játékot (P=pause), és 
nyomjuk végig az összes funkcióbillen¬ 
tyűt (FI—F10). Ezután a joyt húzzuk jobb¬ 
ra, majd nyomjuk meg az ESC gombot. 
Ezzel az ügyes kis trükkel a nehézkesebb 
pályákat kikerülhetjük. 


amit a játék elején írhatunk be, így nem 
kell mindent élőiről kezdenünk. A gyen¬ 
gébbek kedvéért néhány kód az első pár 
szintről: ZG3CAHLB, IPTIANMI, QKI- 
UGTTD, BMJ6YU6D, FT2LMDL1, 
4UGEYNN6. 

Ha a SECOND SAMURAI-t pár szó¬ 
val kellene jellemeznem, azt mondanám, 
hogy a grafika és a hanghatások egysze¬ 
rűen lenyügözőek, a játszahatóság nagyon 
jó. Egyszóval ezt programot senki sem 
hagyhatja ki. Aki ismerte a FIRST 
SAMURAI-t, annak biztosan ez is tetsze¬ 
ni fog. 

Batár Gábor 
(BREAK) 
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A játéknak különösen jó grafikája 
van. Ha valakinek nehéznek tűnik egy pá¬ 
lya, nyomja végig a billentyűzetet, ezután 
az ESC segítségével a szintek között lépe¬ 


gethet. Lőni a botkormány felhúzása után 
a tűzgomb megnyomásával lehet. A tölté¬ 
nyek csak korlátozott mennyiségben hasz¬ 
nálhatók. Az első pályán a TlOOO-essel 


kell megküzdenünk. Ha a lőszerek el¬ 
fogytak verekedve csökkenthetjük az el¬ 
lenfél energiáját. A második szinten ven¬ 
tillátorokat kell felszedni, miközben a 
TlOOO-es egy kamionnal üldöz, és el akar 
ütni. A harmadik pályán a T800-as kezét 
kell összerakni. Nem lesz könnyű! A ne¬ 
gyedik szinten ismét verekedni kell a 
TlOOO-essel. A legkönnyebb ha lelőjük, 
de vigyázzunk a golyókra mert még szük¬ 
ségünk lesz rájuk. Az ötödik pályán ismét 
szerelgethetünk, mégpedig a T800-as sze¬ 
mét kell összeraknunk 100 másodperc 
alatt. A hatodik pályán zsarukat kell eltá- 
volítanunk, ezért tegyük a joyt autofire-re 
és mozgassuk fel-le, így egyszerűen túl¬ 
juthatunk. A hetedik pályán egy rendőr¬ 
autóval menekülünk a TlOOO-es elől. A 
robot helikopterről lő, miközben nekünk 
autókat kell kerülgetnünk. Elérkeztünk a 
nyolcadik pályához az utolsó szinthez, 
ahol eldől, hogy a T800-as képes-e le¬ 
győzni a TlOOO-est. 

Laurán István 






3. Ki készítette a SUPERFROG nevű 
ügyességi játékprogramot? 


C-64: 


Kérdéseinket a Commodore újság 
93/10-es száma alapján készítettük, me¬ 
lyek géptípusonként a következők: 


1. A mellékelt képen egy akcióprog¬ 
ram (HOSTAGES) részletét láthatjuk. 
Kérdésünk a fotóval kapcsolatos. Névsze- 
rint (6) kik vesznek részt a túszok kiszaba¬ 
dításában? 


AMIGA: 

1. Mikor készült az OIL IMPE- 
RIUM nevű gazdasági szimulátor? 

2. Mi a neve a STUNT CÁR RACER 
utolsó pályájának, ahol cölöpökre emelt 
úton versenyezhetünk? 


2. A Commodore újság 93/10-es szá¬ 
mában egy háromdimenziós üzenet készí¬ 
tő program felhasználói leírása található. 
Melyik funkcióbillentyűt (F?) kell le¬ 
nyomnunk, ha az elkészült munkát (de- 
mót) meg akarjuk tekinteni? 



DELTA 

ECHO 

MIKÉ 


o- 
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3. A NARANCS 3 6200 nevű kataló¬ 
gus készítő program, hány betűs ID alkal¬ 
mazására képes. 

A válaszokat géptípusonként, levele¬ 
zőlapon a következő címre várjuk: FRI- 
END TWO CREW, KÉPREJTVÉNY 
1399 BUDAPEST PF.: 701/55. 

Személyenként csak egy levlapot fo¬ 
gadunk el. Beérkezési sorrendben a hu¬ 
szadik helyes megfejtő az Amiga kérdé¬ 
sek esetében egy márkás pólót kap aján¬ 
dékba. A C64-es kérdések megfejtője 10 
db. a legfrissebb játékprogramokkal telí¬ 
tett mágneslemezt kap. A megfejtések be¬ 
küldése az újság következő számának 
megjelenéséig lehetséges. 

IOedves 

'Olvas©! 

Lehetőséget biztosítunk mindenki¬ 
nek cikkei, leírásai, ismertetői újságban 
történő közlésére. Várunk játék, felhasz¬ 
nálói és demó programokról készült írá¬ 
sokat, játékkódokat, tippeket, fortélyos 
fogásokat, melyek Amiga, Commodore 
64 és PC számítógépekhez készültek. 
Minden közlésre alkalmas írás szerzője 
márkás audiókazettát kap. 

A C-64, AMIGA, PC rovat levélcí¬ 
me: FRIEND TWO CREW, CIKK, 1399 
Budapest Pf.: 701/55. 


JÚLI-AUGUSZT. 


































o 


11 éves vagyok. Barátokat 
keresek C-64-vel. Gaszll 
Ákos, 8000 Székesfehérvár, 
Szedreskerti Ind. 37. 

C-64-re programok cseréje, 
esetleg eladása Cartridge 
csere. Válaszborítékért tájé¬ 
koztató. Váradi Ernő, 2151 
Fót, Pf.: 43. 

C-64-rc leírásgyűjtemény le¬ 
mezen. Válaszborítékot ké¬ 
rek. (Készlet korlátozott) 
Varsányi, Szombathely, 
Nagy László u. 11. 

C-64-re programok. Adok- 
veszek-cserélek (csak mag¬ 
nó). Válaszboríték! Attila, 
6754 Újszentiván, Kossuth 
u. 33/b. 

C-64 és C+4 programok le¬ 
mezen és kazettán olcsón el¬ 
adó. Listát küldök. Botos 
Zsolt, 2211 Vasad, Bem út 
14. 

Lemezcsőidomok kiterítési- 
kiszabási terveinek számító¬ 
programjait teljes dokumen¬ 
tációval felhasználóknak, 
idomgyártóknak átadnám. 
Tóth Ferenc, 1077 Budapest, 
Rottembiller u. 42. fszt. 2. 
Tel.: 141—0028. 


C-64-re felhasználói, játék¬ 
programok eladók. Olcsón! 
Nagy választék! Méhes Pé¬ 
ter, 8900 Zalaegerszeg, Gas- 
parich 79. 

Eladó Amiga 500 plus tarto¬ 
zékokkal, félév garanciával. 
Kélemen Zoltán, 4600 Kis- 
várda, Dombköz 6. Tel.: 553. 

Eladó C-64-re GEOS V 2.0 
sok munkaprogrammal. Vá¬ 
laszborítékért lista. Pucsok Pál, 
3700 Kazincbarcika, Pf.: 84. 

576-ban megjelent egyéb C- 
64-es programok eladása le¬ 
mezen, kazettán. Lemezes 
programok kazettás változa¬ 
tai. írj most! Deutsch Sza¬ 
bolcs, 8749 Zalakaros, Fő u. 
19. Tel.: (93) 340—481. 

Amiga 5,25 drive-t veszek. 
Cserepartnert keresek! 3,5-es 
lemezeim eladom. Csernáth 
Zoltán, 1171 Budapest, Dal¬ 
nok u. 5. 

C-64-re már 3 Ft/db ártól el¬ 
adók játék és felhasználói 
programok lemezre és kazet¬ 
tára nagy választékban. Vá¬ 
laszborítékért listát küldök. 
Kovács Krisztián, 6750 Sze- 
ged-Algyő, Bartók B- u- 6. 


APRÓCSKÁK 


C+4 C-64-re programokat adok- 
veszek-cserélek 5 Ft/db. Válasz- 
boríték! Soós Viktor, 7355 
Nagymányok, Katona a 11. 

C-64-re GEOS 2.0 és MAS 
programok eladók. Franyó 
Zoltán, 2310 Szigetszent - 
miklós, Jókai út 16. I1I/2. 

Keresem a Koalapainter lehe¬ 
tőleg lemezes verzióját, mely 
az elkészített képeket ki tudja 
printelni. Kovács Péter, 1025 
Budapest, 'Iürista u. 3. 

C-64 felhasználói, Demo és 
lemezes játékok eladása. In¬ 
gyenes listalemez! Cseh Ba¬ 
lázs, (Magic Soft), 8636 Ba- 
latonöszöd, Szabadság út 112. 

Commodore 64-es számító¬ 
gépre felhasználói progra¬ 
mok eladása és cseréje. Ma¬ 
gyar ékezetes GEOS 2.0 és 
még rengeteg bővítmény 
GEOS-hoz megrendelhető. 
Cartridge-ok készítése más 
bővítések. Listát mindenről 
küldök. Papp Tibor, 1195 
Budapest, Batthyány u. 4. 
Tel.: 282—0513. 

PLOFI C-64 PAGEFOX mo¬ 
dulhoz keresek DEMO-le- 
mezt (pl. CHARAKTER- 


FOX), illetve karakter- és 
grafikagyűjteményt, egeret 
és eredeti (németnyelvű) le¬ 
írást, kezelési utasítást. Tóth 
Ferenc, 1077 Budapest, Rot¬ 
tembiller u. 42. fszt. 2. Tel.: 
141—0028. 

Ékezetes nagy ABC-t kere¬ 
sek C-64/MPS 803 nyomta¬ 
tóra saját táblázat. PRG-hoz 
nem szövegszerkesztőt és 90 
fok elfordítással. Mazi- 
novszky László, 1191 Buda¬ 
pest, Kazinczy u. 1. 8. em. 
35. Tel.: 1781—458. 

Ha programéhes vagy? C-64- 
rc már 4900 játék, 1600 fel¬ 
használói programból válo¬ 
gathatsz. Minden válaszborí¬ 
tékért tájékoztatót küldök. 
Halász, 6001 Kecskemét, 
Pf.: 512. 

Keresem használt de üzem¬ 
képes C-64/I-et. írjanak akik 
pár ezer Ft-ért eladnák. Kül¬ 
sősége nem számít. Jancsck 
István, 8700 Marcali, Posta¬ 
köz 4. II. 13. 

C-64 + 2 Joy + 5 kártya + 
könyvek + floppy + 150 le¬ 
mez + magnó eladó. 23000 
Ft. Fekete István, 2200 Mo- 
nor, Halas út 5. 
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IGEEEN! Megrendelem az 



i 

i 


ACOMP 

Kft. 


Ha kivágta 

i 


borító hátoldalon szereplő kínálatából 


a megrendelőlapot, 

1 

I 


a feladó címére postai utánvétellel az alábbi termékeket: 


kérjük tegye 

i • 

.db 

. Ára 

. Ft/db: összesen . 

.... Ft 

felbélyegzett borítékba, 

1 

i 

. db 

. Ára 

. Ft/db: összesen . 

.... Ft 

címezze meg, 

i • 

. db 

. Ára 

. Ft/db: összesen . 

.... Ft 

és úgy küldje el. 

i . 

| 

. db 

. Ára 

. Ft/db: összesen . 

.... Ft 


i 

. db 

. Ára 

. Ft/db: összesen . 

.... Ft 

Köszönjük! 

i 

. db 

. Ára 

. Ft/db: összesen . 

.... Ft 


i 

i 



. Mindösszesen: . 

.Ft 


i 


Tudomásul veszem, hogy a csomagküldés átfutási ideje 2-4 hét. 



i 


50.000,- Ft feletti megrendelésre csomagküldést nem vállalunk! 



i 

1 


Az áraink a postaköltséget nem tartalmazzák! 












































EGYESÜLET .J§ 


NYOLC SOR A 
SZÁMÍTÁSTECHNIKÁBÓL 


Figyelem! A kétbetűsöknek nem adtunk 
külön számot, mindig a számozott kérdé¬ 
sek után vannak írva! 


VÍZSZINTES: 1. Egy változóra vagy 
egy címkére való hivatkozás, amelyet 
nem definiált programmodulban. 8. 
Állj oroszul. 9. Német város. (VI, TÓ, 
KA, LÓ.) 11. Fordított öreg. 14. Idézőjel¬ 
ző. 16. Varjakhoz tartozó madarak. 17. 
.. .sis, svéd nyelven vérmérgezés. 18. Ve¬ 
réb fajta. 19. Játszma a teniszben. 20. 
Nadrágtartó. 21. Kerti szerszám. 23. Két 
szó: kutrica, ékes névelő. 25. Idegen 
pénznem. (SO). 26. Nem ezek. 27. Nem 
rám? (OL). 29. Kerti vetemény. 31. Őrlő- 
üzem. 33. Testrész. 34. Albán pénzegy¬ 
ség. 36. Nóta (AD). 39. Testrészek. (01). 
42. Szenvedés. 43. Rossz úton jár. 44. 
Orosz folyó. (RO). 46. Ilyen csepp is van. 
(ÉG). 48. ír-e keverve. 50. Remete pá¬ 
ratlan betűi. 51. Község Borsod-Abaúj- 
Zemplén megyében. 53. Hím macska. 54. 
Régi büntetőeszköz volt. 55. Számítás- 
technikai szó. 

FÜGGŐLEGES: 1. Számítástechni¬ 
kai szó. (LS). 2. Szent rövidítése. 3. Van 
ilyen fogat is. (HÓ). 4. Számítástechni¬ 
kai szó. (TG). 5. Beképzelt. 6. Időjelző 
(ZA). 7. Ez is egy számítástechnikai szó. 
10. Több mű. 11. Gyomok. 12. Iratok. 13. 
Átmásolom. 15. Állami illeték. (ZS, OT). 
17. Szálakat egyesít. 22. Az egyik határál¬ 
lomásunk. 24. Romániai város. 26. Szü¬ 
lőm. (OR, IM). 28. Árul. (AL, OL). 30. 
Számítástechnikai szó. 32. Ugyancsak 




K- - 

Feladó: 


□ □□□ 

ACOMP Kft. 

Csomagküldő Szolgálata 


számítástechnikai szó. 34. Egy másik 
útra téved. 35. Ráma. 37. Számítástech¬ 
nikai szó. 38. Gyümölcs. 39. Csak félig 
keblek. 40. Vágóeszköz. 41. Rendben an¬ 
golul. 45. Létezik ilyen derítő is. 47. Igaz. 
48. Foghús. 49. Csúf. 51. Csak félig la¬ 
tens. 52. Összekuszált haj. (AN, RÁ, KU, 
Dl). 

A megfejtéseket nem kell beküldeni, 
mert csak szórakoztató jellegű! (A rejt¬ 
vényben a rövid és hosszú ékezetek között 
nem teszünk különbséget.) 

Mokos István 


Budapest 

XIV. Álmos vezér park 20. 

1141 













































































































































EGYESÜLET 




317 

+4 

91/10 

Adventure - F 

100.- 

319 

C64 

91/10 

Gondolkozó 

100.- 

320 

C64 

91/10 

Mentor i - B 

130.- 

321 

+4 

91/10 

Matekastély 

100.- 

322 

C64 

91/11 

Lottó 

80.- 

323 

€64 

91/11 

Totó 

80.- 

324 

€64 

91/11 

Német gyakorló 

60 . - 

325 

+4 

91/11 

Beszélő szótár 

130.- 

326 

+4 

91/11 

Fi 1e examiner 

60.- 

327 

C64 

91/11 

Sprite szerkesztő 

50.- 

328 

C64 

91/11 

Egyszínű Sprite 

50.- 

329 

€64 

91/12 

Rulett javítás 

50.- 

330 

€64 

91/12 

Tőzsde 

130.- 

332 

C64 

92/ 1 

Ka 1 and 1ap 

80.- 

333 

€64 

92/ 1 

Lévé 1 író 

80.- 

334 

C64 

92/ 1 

Képernyömaszkoló 

130.- 

335 

€64 

92/ 1 

Sprite Kezelő 

100.- 

336 

€64 

92/ 1 

Sí - OPART 

40.- 

337 

C64 

92/ 2 

Patience Quartet 

130.- 

338 

C64 

92/ 2 

Monopoly 

130.- 

339 

€64 

92/ 2 

Akasztóia 

00.- 

340 

C64 

92/ 2 

Karaktértervezö 

60.- 

341 

C64 

92/ 3 

String Array Manager 

100.- 

342 

C64 

92/ 3 

Sprite Basic 

50.- 

343 

C64 

92/ 3 

Screen Help 

50.- 

344 

C64 

92/ 3 

Gyors validate 

60.- 

345 

C64 

92/ 3 

BASIC SYNTAXER I. 

190.- 

346 

C64 

92/ 4 

Tologató C64-re 

100.- 

347 

C64 

92/ 4 

ABC rendező 

100.- 

348 

€64 

92/ 5 

*Matek + Római számok 

100.- 

349 

+4 

92/ 6 

Tesztkészit.ö + értékelő 

100.- 

350 

€64 

92/ 3 

BASIC SYNTAXER II. 

190.- 

351 

+4 

92/ 7 

Három játék 

110.- 

352 

+4 

92/ 7 

Szökés 

80.- 

353 

C64 

92/ 7 

Toto 

150.- 

354 

€64 

92/ 7 

DiGIT analízis program 

110.- 

355 

+4 

92/ 7 

SCREEN DUMP 

150.- 

356 

C64 

92/ 9 

UNISEQ fi lekezelő 

130.- 

357 

064 

92/ 9 

Graphic Copy 

60.- 

358 

C64 

92/10 

Printtox Resizer 

130.- 

359 

C+4 

92/11 

Tologató I1. 

150.- 

360 

C+4 

92/12 

Sprite Plus-4-en 

130.- 

361 

C64 

92/12 

Vá1tozőlista 

150.- 

362 

C64,+4 

93/ 2 

Szomszéd játék 

200.- 

363 

C64 

93/ 2 

Táblás játék 

200.- 

364 

C64 

93/ 2 

SEI)A 

3 50.- 

365 

C64 

93/ 2 

415 * 200 

120.- 

366 

+4 

93/ 2 

OTP hitel 

100.- 

367 

€64 

93/ 3 

Cata1og-Check(CTC) 

150 .- 

368 

C64 

93/ 3 

« Pattogó golyók 

200 . - 

369 

C64 

93/ 3 

Beszoritós (DO-GUTI) 

150 . - 

370 

C64 

93/ 3 

*Zsirozás 

200 .- 

371 

C64 

93/ 4 

Attrib 64 

50.- 

372 

C64 

93/ 4 

Táblázatnyomtató 

80.- 

373 

C+4 

93/ 4 

Boritékkószitő 

80.- 

374 

C+4 

93/ 4 

TV-óra 

50.- 

375 

C64 

93/ 4 

Mini Domino 

150.- 

376 

C64 

93/ 4 

Megathe1lo 

120.- 

377 

C64 

93/ 4 

Reversi 

120.- 

378 

C64 

93/ 4 

Tengeri csata 

120.- 

379 

C64 

93/ 5 

Videokazetták 

80.- 

380 

C+4 

93/ 5 

DIN-karakterek 

80.- 

381 

C64 

93/ 5 

DIRYDIRY 

80.- 

382 

C64 

93/ 5 

Birodalom 

150.- 

383 

C64 

93/ 6 

Csöamöba 

100.- 

384 

C+4 

93/ 6 

Függvényábrázolás 

150 . - 

385 

€64 

93/ 6 

Amőba - E 

100.- 

386 

€64 

93/ 6 

Body Bullding 

60.- 

387 

C64 

93/ 7 

Colour BASIC 

80.- 

388 

C64 

93/ 7 

Directory kezelő 

60.- 

389 

C64 

93/ 7 

ötmezős KONO 

80.- 

390 

€64 

93/ 7 

Fogócska 

80.- 

391 

C+4 

93/ 7 

KIíck - Klack 

120.- 

392 

€64 

93/ 9 

Órarend 

60.- 

393 

C64 

93/ 9 

Ma 1omjáték 

80.- 

394 

C+4 

93/10 

Magyar nyomtatás 

120.- 

395 

C64 

93/10 

Pettyes szfinx 

60.- 

396 

C64 

93/11 

Ku Damm óra 

60.- 

397 

C64 

93/11 

Elásott kincs 

80.- 

398 

C64 

93/11 

Turbo Sort 

80.- 

399 

C64 

93/12 

Telefonkönyv 

80.- 

400 

C64 

93/12 

Színcseré 1o 

80.- 

401 

C64 

94/ 1 

Sprite készítő 

60.- 

402 

C64 

94/ 1 

Amőba 

80.- 

403 

C64 

94/ 1 

3 hasábos nyomtatás(TCT) 

100.- 

404 

C64 

94/ 2 

CIMBO 

80.- 

405 

C64 

94/ 2 

Triagram 3D 

150.- 

406 

C64/+4 

94/ 2 

Fi lenév rendező 

150.- 

407 

C64 

94/ 2 

Ellenállások színkódjai 

120.- 

408 

C64 

94/ 3 

Funkcióbi1lentyük 

80.- 

409 

C+4 

94/ 3 

Adatbázis kezelő 

150.- 

410 

C+4 

94/ 4 

Mini iratkészitö 

120.- 

411 

C64 

94/ 4 

Color List 

100.- 

412 

C64 

94/ 5 

Kalkulátor szimulátor 

150.- 

413 

C+4 

94/ 5 

Totó-Lottó 

80.- 

414 

C64 

94/ 6 

Lemezkiszabási számítások 

150.- 

A *- 

-gal jelölt 

programok csak lemezen rendelhetők 




Kérem, hogy a Commodore Újság legközelebbi számában 
jelenjen meg a következő szövegű apróhirdetés: 


(minden kockába egy betűt írjon) 



Tagsági szám: 


Feladandó az újság címére: 

Commodore Újság 

Budapest, 1388. Pf. 86. 

Alulírott megrendelem a következő programokat a PÖTYÖ- 
GŐSZOLGÁLAT-tól: 


PROGRAM SORSZÁMA 

ÁRA 

1- 

J 

J 


LU - Ft 

2. 



UU - Ft 

3. 




LU- Ft 

4. 



LU- Ft 

5. 




LU- Ft 

6. 




LU'- Ft 

7. 




LU- Ft 

8. 




LU- Ft 

9. 



LU- Ft 

összesen: 



db | || | Ft 


A programokat a SZOLGÁLAT által biztosított 
lemezre (99 Ft/db) 
kazettára (40 Ft/db) 

az általam küldött adathordozóra kérem. 

(Kérjük a megfelelő szöveg aláhúzását!) 

Postaköltség + munkadíj 

A fizetés módja: személyesen — csekken — utánvéttel 

(Kérjük a megfelelő szöveg aláhúzását!) 

ÖSSZESEN: 

A megrendelő neve: . 


Címe: 
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ACOMP Kft. 

JÚLIUS-AUGUSZTUS 
120 Ft-os 

vásárlási utalványa 

Beváltható 500 Ft feletti 

készpénzes vásárlás esetén a 

1135 Budapest, Szent László u. 74/A. és 

1191 Budapest, Katica u. 9. 

szám alatti üzletekben. 

Érvényes: 1994. augusztus 31-ig. 

Egy személy részére egyszeri vásárláshoz 
egy utalvány használható fel! 


MAKROVILÁG 

utazási iroda 

Beváltható 

utazás megrendelése esetén 

az Üllői úti főirodában az alábbiak szerint: 

5 000 Ft-ig — 200 Ft kedvezmény 

10 000 Ft-ig — 400 Ft kedvezmény 

20 000 Ft-lg — 500 Ft kedvezmény 

20 000 Ft felett — 1000 Ft kedvezmény 
Csoportok Jelentkezése esetén további 
kedvezményekről az Irodában lehet tárgyalni 


JÚLIUS-AUGUSZTUS 
120 Ft-os 

vásárlási utalvány 

Beváltható készpénzes 
vásárlás esetén a 2C Áruházban. 

Bp. XIII., Balzac u. 35. 

Érvényes: 1994. augusztus 31-ig. 

HOBBI ELEKTRONIKA 

JÚLIUS-AUGUSZTUS 
vásárlási utalványa 

Értéke: 

5000 Ft-ig 80Ft, 

5000 Ft felett 10% 

Beváltható a Hobbi Elektronika Kft.-nél. 
Budapest VII., Dózsa György u. 16. 
Telefon: 122-8892 

Egy személy részére egyszeri vásárláshoz 
egy utalvány használható fel! 


EGYESÜLET 


A NOVOTRADE SZERVÍZ Kft. az alább felsorolt szervizeiben 
mindenféle szervizszolgáltatás munkadíjából 10% kedvez¬ 
ményt ad az egyesületi tagoknak. 


1083 Budapest, Szigony u. 8. 

3525 Miskolc, Fazekas u. 1-3. 

5600 Békéscsaba, Bartók B. u. 37. 
6724 Szeged, Csongrádi sugárút 76 
9700 Szombathely, Szalonak u. 31. 


Tel.: 1343-153 
Tel.: 46/321-488 
Tel.: 66/327-195 
Tel.: 62/493-185 
Tel.: 94/314-519 


Igazolás: a javítandó berendezés leadásakor egyesületi igazolvánnyal. 
A kedvezmény többször Is Igénybe vehető. 



Az Országos Commodore Egyesület szolgáltatásai 

Egyesületi tagoknak 20% kedvezmény: 


VC—20 memóriabővítés 3—27 kByte-os: kiépítéstől függő 

C—16, C—116 memóriájának bővítése 64 kByte-ra: 3500 Ft 

C—16 belső 16 kByte-os EPROM bővítés: 1450 Ft 

C—16 belső 32 kByte-os EPROM bővítés: 2900 Ft 

C—16 belső 8 kByte-os SOFT—ROM bővítés: 2800 Ft 

C—16 belső 32 kByte-os SOFT—ROM bővítés: 4000 Ft 

C—16 8 kByte-ról 32 kByte-ra átalakítás: 2000 Ft 

C—16 és 1541 kompatibilis lemezegység párhuzamosítása: 3200 Ft 

SOFTROM modul 32K, kikapcsoláskor sem felejt C-16, C-116, +4 5000 Ft 

FÉK C—16. C—116, +4 potméteres sebességváltoztatás 

0%-tól 100%-ig fokozatmentesen 2000 Ft 

TTL IC-teszter (Cartrldge+lemezen a program) 4300 Ft 

+4, C—16, C—116 UNI—ROM modul különféle kiépítésekben: 

— 8 kByte SOFT—ROM 3400 Ft 

— 16 kByte SOFT—ROM 4000 Ft 

— 8 kByte SOFT—ROM 16 kByte EPROM 4400 Ft 

— 16 kByte SOFT—ROM 16 kByte EPROM 5000 Ft 

— 16 kByte EPROM 2200 Ft 

Egyesület tagoknak 30% kedvezmény: 

Speeddos (átkapcsolható) operációs rendszer beépítése 

(C64 átalakítás, lemezegység átalakítás + párhuzamos kábel) 5000 Ft 

1541 kompatibilis lemezegységbe elektronikus lemezlyukasztó beépítése 900 Ft 

PAGEFOX magyar ékezetes kiadvány-szerkesztő cartridge 
(a teljes A/4-es oldal kinyomtatásához 640 pont/soros nyomtató szükesé- 
ges minimum, pl. Citizen 120D) 5500 Ft 

FASTLOAD cartridge (lemezes gyorstöltő, másoló, monitor) 1500 Ft 

TTL IC-teszter cartridge + program 4300 FT 

288/256 Kbyte-os eprombank (vezérlő eprommal) 5000 Ft 

Epromégető (2716-tól 27512-ig) 5000 Ft 

C64-hez tároló oszcilloszkóp 8000 Ft 

C64-bővítő-port elosztó (egyszerre 4 db cartridge lehet a gépben, melyeket 
gombnyomásra lehet kapcsolni) 7500 Ft 

C64 USER — CENTRONICS nyomtatókábel (GEOS kábel) 1500 Ft 

256 K RAM-diszk (256 Kbyte RAM-mal) 14000 Ft 

256 K RAM-diszk (64 Kbyte RAM-mal) 9000 Ft 

2x64 Kbyte-os cartridge igény szerinti programokkal feltöltve 4.300 Ft 

64 Kbyte-os cartridge igény szerinti programokkal feltöltve 3000 Ft 

Képújság (teletext) dekóder C-64-re 10000 Ft 

1764-es RAM bővítő GEOS-hoz is használható 11250 Ft 

Epromok programozása meglévő programokkal, vagy saját hozott progra¬ 
mok beégetésével 2716-tól 27512-ig az eprommal együtt egységesen 700 Ft 

Árainkat az alkatrészárak változásai befolyásolhatják. 

A fenti bővítések megrendelhetők levélben az O.C.E. címén, valamint sze¬ 
mélyesen a havonta rendezendő klubdélelőttön, ahol rendszeres bemutatót 
is tartunk. 


Postázás esetén 100 Ft postaköltség kerül felszámításra. 

A kedvezmény igénybevételéhez az O.C.E. tagsági igazolvány bemutatása 
szükséges. 
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S yQuest 


Hivatalos magyarországi disztribútora: 



Cím: 1053 Budapest, Henszlmann I. u. 9 
Telefon: 117-4144 Telefax: 117-9692 


Cserélhető lemezes winchester! 


Szervizeinkben és szerződött viszonteladóinkon keresztül az alábbiakat forgalmazzuk: 


SQ 555 

44 MB-os 5V 4 

SCSI drive, 

SQ 400 lemez 

( 44 MB) 

SQ 5110 

88 MB-os 5V 4 

SCSI drive, 

SQ 800 lemez 

( 88 MB) 

SQ 3105A 

105 MB-os 3V 2 

AT-BUS drive, 

SQ 310 lemez 

(105 MB) 

SQ 2542A 

42 MB-os 2V 2 

AT-BUS drive, 

SQ 240 lemez 

( 42 MB) 


\ _ y 


Számítógépszerviz ! 


Személyi számítógépek és perifériák javítását, karbantartását továbbra is tőlünk 
rendelje meg! Gyors, pontos és megbízható! Örök garanciát kap, 
ha átalánydíjas javítási és karbantartási szerződésformánkkal 
védi nagyértékú gépei műszaki állapotát. 


Várjuk jelentkezését az alábbi szervizeinkben: 


1083 

Budapest, 

Szigony u, 8. 

Tel.: 

1343-153 

3525 

Miskolc, 

Fazekas u. 1-3. 

Tel.: 

46/321-488 

5600 

Békéscsaba, 

Bartók B. u. 37. 

Tel.: 

66/327-195 

6724 

Szeged, 

Csongrádi sgt. 76. 

Tel.: 

62/493-185 

9700 

Szombathely, 

Szalonak u. 31. 

Tel.: 

94/314-519 


NOVOTRADE SZERVIZ KFT. 
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Ára: 176 Ft 



SZÁMÍTÁSTECHNIKAI KFT. 


1125 Budapest, Királyhágó utca 2. 
Tel.: 156-6790 

1135 Budapest, Szent László út 74/a. 
Tel.: 149-6165 

1191 Budapest, Katica utca 9. 

Tel.: 280-4267 

Fax: 251-2385, 220-1643 
SZERVIZÜNK : 

1135 Budapest, Szent László út 74/a. 
Tel.: 149 - 6165 


Commodore számítógépek 

Árak 

Commodore Amiga 600 

27992 

Ft 

Commodore Amiga 1200 

39120 

Ft 

Commodoie Amiga 1200 Desklop Dynarnite 

47992 

FI 

Commodore Amiga CO-32 + 2 játék 

31992 

Ft 

Commodore A-520 TV-Modulator 

5592 

Ft 

Commodore C-64 Terminator set 

11192 

FI 

Commodore Datasetle 

2392 

Fi 


G.V.P. Termékek 

Árak 

G.V.P G-Lock S-VHS genlock 

47920 Ft 

G.V.P. A123O-ll/5Qf00/4 + DPP - II 

95920 Ft 

G.V.P. A1291 SCSI Option 

11920 Ft 

G.V.P. Impact Vision 24 / CT - Pál 

159120 Ft 


Mágneslemezek 

Árak 

NoName 3.5" DSDD lemez 

392 Ft 

NoName 3.5" DSHD lemez 

392 Ft 

NoName 5.25” DSDD lemez BULK 

152 Ft 

Maxell 3.5" MF-2HD lemez 

792 Ft 

BASF 5.25" DSHD lemez 

552 Ft 

Wonderline 5.25" DSHD lemez 

256 Ft 

Polaroid 3.5" OSDD lemez 

552 Ft 

Polaroid 3.5" DSHD lemez 

792 Ft 

Polaroid 5.25' DSDD lemez 

360 FI 

Profex 3.5" DSDD lemez 

432 Ft 

Profex 3.5" DSDD lemez (11 db/Form.) 

472 Ft 

Prolex 3.5’ DSHD lemez (11 db/Form j 

632 Ft 

Profex 5.25" DSHD lemez (11 db/Form.) 

280 FI 


Egyéb kiegészítő termékek 

Árak 

Noris porvédó Amiga 600-ra 

792 

Ft 

Noris porvédó C-64 l-re 

120 

FI 

Noris porvédó C-64 ll-re 

632 

Ft 

Noris MB 80 3.5' lemezlartó doboz 

344 

Ft 

Noris DB 100 5.25' lemeztartó doboz 

344 

Ft 

Noris üveg 14" földelhető monitorfilter 

992 

FI 

Swifty Mouse Amigához 

2000 

Ft 

Mouse ■ Joystick Automatikus kiválasztó 

2000 

Ft 

Reál Time Clock Amiga 1200 • hoz 

2000 

FI 

Midi Amiga Interface 

2800 

FI 

Handyscanner Fekete/Fehér Amigához 

14392 

FI 

Stereó hangdigitalizáló Amigához 

5592 

Ft 

Sound Enhancer Amigához 

2800 

FI 

Trackball Amigához 

2800 

FI 

Rockey Advanced Videó Keying Amigára 

19992 

FI 

1.76 Mb HD külső floppy Amigához 

13592 

FI 

2.5—2.5" Hard disk kábel 

2392 

Ft 

Mouse pad 

152 

Ft 

C-64 midi szoftverrel 

5200 

Ft 

Action Replay MK VI Pro C-64-hez 

4720 

Ft 

Képdigitalizáló (színes) C-64-hez 

1592 

Ft 

Képdigitalizáló (színes) Atari ST-hez 

7992 

Ft 

Beyond the minds eye (Computer Animáció) 

2400 

FI 


Sega Termékek 



Árak 

Sega Megadrive + 2 

pad + 

4 játék 

19192 

Ft 

Sega Megadrive + 1 

pad t 

1 játék 

12792 

Ft 

Sega MegaCD II. + 

3 CD játék 

42392 

Ft 

Sega MegaCD II. * 

1 CD játék 

35192 

Ft 

Sega Game Gear t 

1 játék 


11192 

Ft 


Memóriabővítők Árak 


512 Kb-os órás bővítő Amiga 500-ba 3992 Ft 

1.0 Mb-os órás bővítő Amiga 500 PLUS-ba 5592 Ft 
1.0 Mb-os órás chip bővítő Amiga 600-ba 6392 Ft 

0.0 Mb-os órás fastram bővítő Amiga 1200-ba 9592 Ft 

1.0 Mb-os órás fastram bővítő Amiga 1200-ba 13592 Ft 
2.0 Mb-os órás fastram bővítő Amiga 1200-ba 19192 Ft 
4.0 Mb-os órás tastram bővítő Amiga 1200-ba 30392 Ft 
8.0 Mb-os órás tastram bővítő Amiga 1200-ba 50392 Ft 
2.0 Mb-os PCMCIA bővítő AőOO / A1200-ba 15992 Ft 

4.0 Mbos ram modul Amiga 4000-be 22392 Ft 


Joystickok: 27 féle külső 440-3192 Ft 


Alaplapok: Árak 


366DX-40MHZ 128Kb cache (OPTI.AMI) 9.576 

386DX-40MHZ 128Kb cache 2 Vesa (OPTI. AMI) 12.792 
486SLC-33MHZ 64Kb Cache (ETEQ, IBM OEM) 11.200 
486DLC-40MHZ 128Kb cache 2 \fesa LB (OPTi, AMI) 16.480 
486SLC2-50MHZ 12.400 

486DX-XXMHZ 256Kb cache. 3 VESA NoCPU (Af.1l) 9.840 


1/0 kártyák: 

Árak 

IDE+ HDD/FDD 2S1P1G vezérló 

1.176 

Hurrican IDE+ HDO/FDD 2S1P1G vezérlő Vesa 

2.496 

Realtek VGA 256Kb RAM 

2.992 

Realtek VGA 512Kb RAM 

4.280 

Trident 8900 VGA 0Kb RAM 

2.560 

Trident 9400 VGA 1/2Mb RAM Vesa, True color 

8.992 

WD VGA 1/2Mb RAM Vesa, True color 

9.992 

Tseng ET-4000 VGA 1Mb RAM Vesa, True color 

10.800 

| Tomahawk VGA 1Mb RAM, Vesa. True color, GUi 11.360 | 


Monitorok: 

Árak 

14' SVGA mono (800*600) 

10480 

14' SVGA color ÁXION (1024*768. 0.28) 

24.160 

14' SVGA color AXION (1024*766. 0.28 


Low Radi. NI) 

28.500 

17' Philips SVGA color (1024*768. stereó) 

87200 


Floppy, CD-ROM Drive-ok: 

Árak 

1 1.2 Mb FDD Chinon 

4.720 

1.44 Mb FDD Chinon 

3.720 

| Panasonic CO-ROM dupla sebesésgú. vezerló kártya 17.992 | 


Hangkártyák, Fax/modemek: Árak 


Sound Blaster 2.0 (8bit OAAD. mono) 6.320 

Sound Blaster PR02 (8bit DAAD stereó) 9.792 

Sound Blaster 16BASIC (16bit OAAD, stereó) 12.792 
Sound Blaster 16ASP Multi CD (16bit DAAD. stereó) 21.592 
Sound Blaster 32AVE 

(16bit DAAD. Wave, General MIDI) 34.392 
ZOLTRIX 96/46,'24bps belső FAX/MODEM 5.592 

ZOLTRIX 14400bps belső FAX-'MODEM 13.696 

ZOLTRIX 14400bps külső FAX/MODEM 17.920 

ZOLTRIX 28800bps belső FAX-'MODEM 23.992 

STANDARD LCD 14400bps külső FAX-'MODEM 25.992 
STANDARD DIGIT 14400bps külső FAX-'MODEM 27.992 
STANDARD POCKET 14400bps külső 

FAXMODEM 25.992 


Winchesterek: 

Árak 

210Mb Conner 

20.992 

250Mb IBM 

22.492 

340Mb Quantum 

26.992 

420Mb Conner 

29.592 

540Mb Conner 

39 992 

1080Mb Quantum SCSI 

88.800 


(Co)processzorok: 

Árak 

IIT387DX-40MHZ 

2.792 

ULSI 387SX-33MHZ (487SLC) 

3.192 

ULSI 387DLC40MHZ 

3.192 

486DX-33MHZ Cyrix 

17.992 

486DX-40MHZ Cyrix 

19.992 

486DX2-50MHZ Cyrix 

22.492 

486DX2-66MHZ Intel 

34.500 

4B6DX4-1ÜOMHZ Intel 

77.992 

Processzor ventillátor 

680 


Memória elemek: 

Árak 

414256 DIP RAM 

616 

256Kb SIMM 70ns 

1.296 

1Mb SIMM 70ns 

3.660 

4Mb SIMM 70ns 

15.992 


Házak: 

Árak 

Babyház+2O0W táp ledes 

4.200 

Mímtorony+200W táp ledes 

4.200 

Mimtorony*200W táp ledes + trekis 

4 300 

Miditorony+200W táp ledes + trekis 

5.664 

Nagytorony+200W táp ledes ♦ trekis 

7.056 


Billentyűzet, mouse: 

Árak 

101 gombos billentyűzet (Angot-'Hun) 

1.800 

ACOMP mouse + software 

832 

Micro mouse * mini pad 

1.320 

True mouse 1 + pad + holder 

1.720 


Nyomtatók: 

Árak 

HP DeskJet 520 (A4 fekete) 

33.992 

HP DeskJet 500C (A4 színes) 

46.800 

HP DeskJet 550C (A4 színes) 

57 760 

HP LaserJet 4L (300 dpi) 

91.200 

HP LaserJet 4ML (300 dpi) 

143.200 

HP LaserJet 4 (600 dpi) 

179.992 

HP DeskJet patron dupla 

3.424 

HP DeskJet patron színes 

3.640 

HP LaserJet 4L-4ML toner 

8.640 

HP LaserJet 4 toner 

14.904 


AMSTRADMEGA 386SX 

SEGA MEGA DRIVE + gamepad 
AMSTRAD 386SX-25MHZ, 

2Mb RAM, 40Mb HDD, 

1.44Mb FDD 14“ 

VGA color stereó monitor, mouse, 
billentyűzet, joy, 

MS-DOS 5.0 

Mind ez egyetlen síim házban, 
a család ideális játék és munkagépe. 

66.000Ft 


Babyház, 1.44Mb FDD. 

IDE+ 

14' VGA mbno, 256Kb 

14" SVGA color. 512Kb VGA 

2S1P1G, 101 gombos bili. 

210 Mb 

240 Mb 

340 Mb 

240 Mb 

340 Mb 

420 Mb 

540 Mb 

386DX-40MHZ 

4Mb RAM 

69.578 

71,078 

75.578 

86,046 

90,546 

93,054 

103,546 

486SLC2-50MHZ 

2Mb RAM 

65.080 

66.580 

71,080 

81,548 

86,048 

88,556 

99,048 

486DLC-40MHZ 

4Mb RAM 

76.480 

77,980 

82,480 

92,948 

97,448 

99.956 

110.448 

486DX-33MHZ 

4Mb RAM 

87.832 

89.332 

93.832 

104,300 

108,800 

111,308 

121,800 

486DX2-66MHZ 

4Mb RAM 

104,340 

105.840 

110.340 

120,808 

125,308 

127,816 

138.308 


Konfiguráció 
vásárlása esetén 


8.400 Ft-ért 

jogtiszta 
MS-DOS 6.2 
és MS-Windows 3.1 

installálunk gépére. 


Áraink a 25% ÁFÁ-t nem, de 12 hónap garanciát tartalmaznak. Készpénz fizetés esetén érvényesek. 










































































































